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HERBERT'S DUMMY RUN 
SPECTRUM/COMMODOREI AMSTRAD 


LO QUE DICE LA CRITICA: 
HERBERT'S ES UNA MEZCLA ENTRE EL 
upy JAMARAMA" y EL -"EVERVONE'S A 
.
 WALL V", PROGRAMAS DE LOS QUE HA 
ESCOGIDO LO MEJOR PERO 
AUMENTANDO LA CALIDAD DE 
GRAFICOS V MOVIMIENTO. 
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RECOMENDADO PARA TODO TIPO DE 
USUARIOS, PARA LOS QUE PREFIERAN 
LOS JUEGOS SENCILLOS DE ARCADE V 
PARA LOS QUE PREFIERAN LOS JUEGOS 
COMPLICADOS EN LOS QUE ADEMAS DE 
SER HABILIDOSO ES NECESARIO ACTUAR 
CON LOGICA V CREAR UN PLAN DE 
ESTRATEGIA A SEGUIR. V SOBRE TODO 
RECOMENDADO PARA LOS QUE 
DISFRUTARON CON PVJAMARAMA. 
VALORACION: * * * * * y WALL Y. 
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(Si lo prefieres suscribete por teléfono (91) 73350 12 (91) 73350 16) 
Oferta especial para recibir en tu domicilio todo un año la revista semanal 
Microhobby AMSTRAD 
con un descuento de 1.600 ptas., iy el regalo de una cinta 
original por valor de 2.100 ptas.! 
FECHA LIMITE DE RESPUESTA: iSENALA EL NOMBRE DE LA CINTA QUE 
30 DE NOVIEMBRE DE 1985 PREFIERES Y LA RECIBIRAS EN TU CASA, 
iRESPONDE HOY MISMOI GRATIS, A VUELTA DE CORREO! 


Oeseo suscrihllme aMicrohobby AMSTRAD durante un año por só105.900 ptas.. lo que me supone un ahorro de1.600 ptas. 
1:1 primer numero que deseo recibir es el 
r"vlenmeGRATIS la cinta de programas que le indico con una (X) 
O Beach Head DCombat Lyn. O D.T. Decathlon 


NOMBRE 
APELLIDOS 
DOMICILIO 
CIUDAD 
C.POSTAL 


EDAD 


TELEFONO 


PROVINCIA 
PROFESION 


Marco con una (X) en el casillero correspondlenfe la forma de pago que mas me conviene. 
O TalÓn bancano adlunto a nombre HOBBY PRESS, S. A O GIIO Postal N° 
pnmer numero. Junto a la casselle regalo. O VISA N.o 
Fecha de caducidad de la larlela 


o Contra reembolso del 
O MASTER CHARGE N a 


Filma. 


Presidente 
María Andrino 
Consejero Delegado 
Jo<e 1. Gómez-Cen!urión 


Jefe de Publicidad 
Concho Gutiérrez 
Publicidad Barcelona 
José Golón Cortes 
Tel: (93) 303 1022/3137162 


Secretario de Dirección 
Mori<o Cogorro 
Suscripciones 
M. a Rosa Gonzólez 
M.o del Mor Colzado 
Redocción, Administración 
y Publicidad 
Lo Gronja, s/n 
Polígono Industriol de Alcobendas 
Tel.: 65432 11 
Telex: 49 480 HOPR 


Dto. Circulación 
Carlos Perapadre 
Distribución 
Coedis, S. A. Valencia, 245 
Borcelono 


Imprime 
ROTEDIC, S, A. Crto. de Irún. 
Km. 12,450 (MADRID) 
Fotocomposlción 
Novocomp, S.A. 
Nicolós Moroles, 38-40 
Fotomecánica 
GROF 
Ezequiel Solana, 16 
Depósito Legal: 
M-28468-1985 


Derechos exclusivos 
de la revisto 
COMPUTlNG with 
the AMSTRAD 


Represenlonle para Argentina, Chile, 
Uruguay y Paraguay, Cia. 
Americano de Ediciones., S.R.L. Sud 
Americo 1.532. Ter., 21 2464. 1209 
BUENOS AIRES (Argenlina). 
M. H. AMSTRAD no se hace 
necesariamente solidaria de las 
apinione!a verfidos por sus 
calaborodores en los arhc.ulos. 
firmadas. Reservados Iodos los 
derechos. 


Se salidloró control OJD 


ProgramAcción U 
Para dar vida y animación a los gráficas de un 
programa, lo mejor que se puede hacer, dicen 
algunas, es recurrir al lenguaje máquina, No obstante, 
como pretendemos estudiar en unos cuantos artículos, 
el Basic Amstrod tiene mucho que decir en este 
sentido, 


'0 Sonimag, 85 
Informamos de la Feria del Sonido y la Imagen que 
se celebró en Barcelona del 23 al 29 de septiembre, 
Muchas novedades han aparecido en nuestro pafs, 
sobre todo la presentación oficial del Amstrod 
CPC6128. 


Análisis 


Muchos ordenadores poseen en su juego de 
instrucciones un comando que permite representar 
elipses, definiendo a nuestro gusto el centro y ejes de 
la misma, 
Análisis, en este número, estudia un pequeño 
progroma que, consiguiendo el mismo efecto, te 
ayudará a comprender el proceso seguido en la 
representación de estas curvas. 


J 


Serie oro 


Siempre ha constituido un verdadero problema para 
cualquier estudiante de BUP, tanto la resolución y 
representación gráfíca de ecuaciones de segundo 
grado como el de sistemas de dos incógnitas, 
Serie oro, con ellncogniton, te lo pone fácil: no más 
trabajosos cálculos a mano, 
También tienen cabida aquí los clásicos de la 
programación, los programas pioneros en el mundo de 
105 juegos. Atari empezó, y Smaley cierra dignamente 
el capitulo de los «comecocos" 
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uctura, es una misión en 
leófito como para un 
-naut te acerca al mundo 
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Primeros pasos 
Ni un solo programa funciona sin incorporar en su 
interior tareas repetilivas, bucles. Una de las mejoras 
formas de hacerla es usar los bucles estructurados, 
como el WHILE.. WEND, 


26 Código 
Máquina 
Seguimos estudiando los registros dobles dellBO, en 
una de sus funciones más esenciales: actuar de 
punter
s para acceder a zonas predeterminadas de la 
memoria. 
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LO QUE DICE LA CRITICA: 
HERBERT'S ES UNA MEZCLA ENTRE EL 
IIPV JAMARAMA" y EL IIEVERYONE'S A 
WALLY", PROGRAMAS DE LOS QUE HA 
ESCOGIDO LO MEJOR PERO 
AUMENTANDO LA CALIDAD DE 
GRAFICOS V MOVIMIENTO. 


RECOMENDADO PARA TODO TIPO DE 
USUARIOS, PARA LOS QUE PREFIERAN 
LOS JUEGOS SENCILLOS DE ARCADE Y 
PARA LOS QUE PREFIERAN LOS JUEGOS 
COMPLICADOS EN LOS QUE ADEMAS DE 
SER HABILIDOSO ES NECESARIO ACTUAR 
CON LOGICA y CREAR UN PLAN DE 
ESTRATEGIA A SEGUIR. Y SOBRE TODO 
RECOMENDADO PARA LOS QUE 
DISFRUTARON CON PY JAMARAMA. 
V WALLV. 


VALORACION: * * * * * 
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Año / . Número 7. 1 S al 21 de Octubre de 1985 
1 SO ptas. (sobre tasa Canarias, 10 ptas.) 


5 Primero 
plano 
Ultimas noticias del mundo del ordenador: los 
problemas de Apple Camputer, nueva directiva en 
Sinclair Research y la presentación en España del 
PCWB256, 


ProgramAcción , 
Para dar vida y animación a los gráficos de un 
programa, lo meior que se puede hacer, dicen 
algunos, es recurrir allenguaie máquina, No obstante, 
coma pretendemos estudiar en unas cuantos articulos, 
el Basic Amstrod tiene mucho que decir en este 
sentido, 


lO Sonimag, 85 
Informamos de la Feria del Sonido y la Imagen que 
se celebró en Barcelona del 23 al 29 de septiembre, 
Muchas novedades han aparecido en nuestro país, 
sobre toda la presentación oficial del Amstrod 
CPC6128. 


Análisis 


Muchas ordenadores poseen en su iuego de 
instrucciones un comando que permite representar 
elipses, definiendo a nuestro gusto el centro y eies de 
la misma, 
Análisis, en este número, estudia un pequeño 
programa que, consiguiendo el mismo efecto, te 
ayudará a comprender el proceso seguido en la 
representación de estas curvas, 


J 


Serie oro 


Siempre ha constituida un verdadera problema para 
cualquier estudiante de BUP, tanto la resolución y 
representación gráfica de ecuaciones de segundo 
grada como el de sistemas de dos incógnitas, 
Serie oro, can ellncogniton, te lo pone fácil: no más 
trabaiosos cálculos a mana. 
r ambién tienen cabida aquí las clásicos de la 
programación, los programas pioneros en el mundo de 
los iuegos, Atari empezó, y Smaley cierra dignamente 
el capítulo de los «comecocaSj. 
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lB Mr. Joystick 
Conducir un trailer de 24 eies, acompoñada de las 
tareas de carga, descarga, aparcamiento y tráfico por 
una ciudad de intrincada estructura, es una misión en 
extremo difícil tonto para el neófita como para un 
conductor de primera, Juggernaut te acerca al mundo 
de los camiones pesados. 
Boulder Dash: un simpático personaie a la coza de 
los diamantes subterráneas, 
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Primeros posos 
Ni un solo programa funciona sin incorporar en su 
interior tareas repetitivas, bucles, Una de las meioras 
formas de hacerlo es usor los bucles estructurados, 
como el WHILE.. WEND. 


26 Código 
Máquina 
Seguimos estudiando los registros dobles delIBO, en 
una de sus funciones más esenciales: actuar de 
punter
s para acceder a zonas predeterminadas de la 
memofla. 
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AJEDREZ (3 Dimensiones) 3.500 Ptas. 
THE COVENANT . . . .. 2.700 Ptas. 
EXPLODING FIST .... 3.100 Ptas. r 
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U re" e rega , 
! or cada programa. 


y además... 


GREMLlNS . . . . , . . . . . . . , , . . . . . . . . . . .. 2.300 Ptas. 
BEACH HEAD "...........,......... 2.700 Ptas. 
COMBA T LI NX.. . . . . . , . . . . , . , . , . . , . . .. 2.100 Ptas. 
POlE POSITION ...,......,..,.,..... 1.900 Ptas. 
DRAGONTORE (prox.) .....,.,.,....., 2.100 Ptas. 
DECATHlON ...,..,..."",......... 2.100 Ptas. 
KNIGH lORE (Novedad) .........,.,. 1.950 Ptas. 
ALlEN 8 (Novedad) ,.,.......,.,. 1.950 Ptas. 
KONG STRIKES BACK .....,..,.. 2.100 Ptas. 
HUNCHIBACK 11 ...".,....... 2.100 Ptas. 
ONE ON ONE (Novedad) ., 3.100 Ptas. 
ROCKY . . . , . , , . . . . . . " 2.100 Ptas. 
RAID OVER MOSCOW 2.100 Ptas. 
BOXING .",.... 1.950 Ptas. 


Este magnífico reloj digital de cinco 
funciones puede ser tuyo si pides 
tus programas al Círculo de Soft. 
Si tu compra es de dos programas 
te obsequiamos con: Un 
conmutador TV.Ordenador... y ambos 
regalos si pides tres programas. 
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Nuestra dirección: 
Castellana, 268, 3. o C 
28046 MADRID 
Te!.: 7332500 



UN 
ORDENADOR 
MUY 
PROFESIONAL 



oco. en estos m;smos 
páginas, cuando informábamos a 
nuestros lectores del PC Show de 
Londres, comentamos la existencia 
de un nuevo modelo de Amstrad di- 
rigido sin ambages al mundo profe- 
sional. Se trata del PCW8256, siglas 
de ordenador personal y procesador 
de textos. 
A guisa de recordatorio, esta má- 
quina tiene 256 Kbytes de memoria 
RAM, una unidad de disco integra- 
da e impresora, funcionando todo 
ello bajo el sistema operativo CP!M 
Plus, y lo más importante, un progra- 
ma procesador de textos, el Locos- 
cript, que se entrega gratis al com- 
prar el paquete, además de un Ba- 
sic y un Logo. 
La presentación oficial del nuevo 
ordenador se realizará en el hotel 
Meliá de Madrid el día 15 del mes de 
octubre, y el precio de venta al pú- 
blico de todo el paquete: monitor 
fósforo verde, teclado, unidad de 
disco e impresora será, según fuen- 
tes de Indescomp, de 159.900 ptas. 


1:'.': ".u"lr. " I 
EJ ,j 
 ' I J ' i 
.
, ',' ¡ :..: 
'.1 1 1 .: 
ni '11:' 'm1D' r . 


¡;::-.-:g 


lJ:Ei!!] 


- 
... 


I-
 


¡ 1.:1 ",!' I 


! 
 '" 
 'J u ,'¡' 
 ,¡, '" 



rimera 
plana 


REESTRUCTURAOON EN 
SINCLAIR RESEARCH 


Sinclair Research, la compañía bri- 
tánica fundada por C/ive Sinclair y 
creadora del Spectrum, ha sufrido 
p,r,ofundos 
ambios en la composi- 
clon de su directiva, como probable 
resultado de las dificultades financie- 
ras que han sufrido. 
Sir Clive se dedicará a investigar 
nuevas tecnologías e ideas, pero 
abandona el puesto de presidente 
ejecutivo, que ocupaba hasta hace 
poco. 
Al parecer, casi todo el mundo in- 
cluido tal vez el propio señor Sincíair 
piensan que su fuerte no es precisa
 
mente la dirección financiera de un 
negocio, sino desarrollar la labor 
creativa que corresponde al inventor 
e investigador. 
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@ Los 
PROBLEMAS 
DE ApPLE 


En 1977, Wozniak y Jobs fundaron los or- 
denadores persanales y Apple Computer en 
un garaje. Ambos socios caminaron juntos du- 
rante algunos años, en los que Apple crecía 
hasta convertirse en una de las compañías de 
informótico mós fuertes del mundo. 
Los problemas de Apple comenzaron con el 
proyecto Maclntosh. 
Jobs creía firmemente en él, pero Wozniak 
pensaba que era una locura. Resultado: el Mo- 
clntosh nació y Wozniak abandonó Apple pa- 
ra dedicarse a construir lavadoras (!). 
Comenzó o sonar entonces, junto al del su- 
perviviente Jabs, el nombre de John Scul/ey, 
director general de Apple, el cual no tardó mu- 
cho en tener serias «diferencias» con el en- 
trañable Jabs. 
El resultado no ha sido una gran sorpresa: 
Jobs dimitió de su puesto de presidente de Ap- 
pie y se marchó con idea de fundar una nue- 
va compañía de informótica, pero tuvo el de- 
talle de llevarse consigo a los mejores cerebros 
de Apple Computer, prócticamente todos ellos 
comprometidos en los proyectos de investiga- 
ción y desarrollo mós secretos que imaginar- 
se pueda. 
Obviamente, Scul/ey y sus amigos echaban 
chispas ante la despedida de Jabs, y han ma- 
nifestado a los cuatro vientos su inquebranta- 
ble voluntad de hacerle polvo, perdón, de- 
mandarle. 
Para mayor «inrh), dicen las malas lenguas 
que la postura de Jobs ante la amenaza es ti- 
rarse al suelo de risa, aunque él, lo que es él, 
no ha dicho esta boca es mía. Veremos en qué 
IdO ocabo todo "to 10010,,;0. 
- _.1 


r- 


r; '(f,' 1';'11:1- ¡ 
¡;1\4 iI"V)
 
-- .... ¡ 


-------- 
------ 


MICNOH088Y AMSTRAD 5 


, 
 
I 



ANINlACION 


Seguro que alguna vez habréis usado algún juego comercial 
para Amstrad y os habéis sentido asombrados de los gráficos 
qU2 usan y de su movimiento. ¿A que sí? 


ndudablemente, es cierto. 
Pero el Basic Amstrad, potente como 
es, permite introducirse en el mundo 
de los dibujos animados con facili- 
dad, aunque sin llegar a las cotas 
marcadas por el código de máquina. 
Así vamos a examinar juntos, du- 
rante unos cuantos artículos, las po- 
sibilidades de animar nuestros pro- 
gramas de manera sencilla, hacien- 
do uso de las sentencias Basic LOCA- 
TE y PRINT, cuyo estudio se realizó 
ya en nuestra revista, cuando hablá- 
bamos de las ventanas. 


Los ingredientes de la 
animación 


La animación simple puede redu- 
cirse a una receta, cuyos ingredien- 
tes son tres: 
- Posicionamiento en pantalla 
- Impresión de la figura 
- Dejar pasar un período de 
tiempo adecuado (retardo) entre las 
dos acciones anteriores para dar 
sensación de continuidad y suavidad 
en el movimiento. 
Combinándolas en el orden co- 
rrecto, esto es, posición, impresión 
y retardo, el milagro sucede. 
El programa 1 demuestra este teo- 
rema por el simple procedimiento de 
imprimir un mensaje en pantalla y 
desplazado hacia arriba. 
Para este suceso, cómo no, existe 
una palabra técnica: SCROLL (del in- 
glés SCrren ROLL, «enrollar la pan- 
talla», que conviene irse acostum- 
brando a utilizar. 
Las líneas 30 y 40 posicionan (LO- 
CATE) e imprimen (PRINT) el mensa- 
je en la posición 10,14 (horizontal, 
vertical) . 
6 MICROH088Y AMSTRAD 
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Observar atentamente el cometido 
de la línea 50: colocar el cursar de 
texto en la última línea de la panta- 
lla, para preparar el terreno a la lí- 
nea 60, la cual imprime un CHR${lO) 
y la pantalla se desplaza una línea 
hacia arriba, «matando» lo que ha- 
ya en la primera línea de la panta- 
lla. Notar también que la pantalla 
sólo hace scroll cuando el cursar de 
texto está en la última línea. 
El bucle FOR...NEXT de las líneas 
60-90 pone en pantalla 20 «blan- 
cos» chr${l O), y fuerza a que el 
mensaje se desplace hacia arriba. 
¿Y la línea 80? Bien, recordar el 
tercer ingrediente de la animación: 
el retardo. Si se omite esta línea y se 
ejecuta el programa, se verá muy 
claro por qué es imprescindible. 
El programa 2 realiza scroll hacia 
abajo de un mensaje. El truco, como 
antes, es colocar el cursar de texto 
adecuadamente, en este caso en la 
PRIMERA línea de la pantalla, y re- 
currir a CHR${l 7), un código de con- 
trol que intenta colocar de nuevo el 
cursar una línea más arriba de don- 
de se encuentre. 
Sin embargo, como astutamente 
hemos colocado inicialmente el cur- 
sar en el tope superior de la panta- 
lla, la única forma en la que el Ams- 
trad puede cumplir lo que ordena el 
código de control, es desplazar la 
pantalla hacia abajo; así de simple. 
Este método es sorprendentemen- 
te efectivo. 
¿Alguien se atreve a escribir un 
programa que imprima un mensaje 
en el centro de la pantalla, lo despla- 
ce hasta la parte superior, luego a 
la inferior y vuelva al centro? 
Si se consigue, es prueba conclu- 
yente de que lo anteriormente ex- 
puesto se ha captado a la perfección. 
Hay casos, dentro de la anima- 
ción, en que nos veremos obligados 
a usar otros métodos distintos; por 
ejemplo, si se quiere mover algo so- 
bre un fondo fijo, el scroll no servirá 
para nada, por razones obvias. 
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En efecto, la pantalla, al despla- 
zarse, destruye el fondo línea a línea. 


. 


Otras técnicas 1 
Afortunadamente, existen formas 
de evitar esto. Ya que la mayor par- 
te de las técnicas de animación im- 
plican mover varios gráficos de dife- 
rentes formas, vamos a comenzar 
con uno solo, como en los progra- 
mas 3 y 4. Se distinguen en el senti- 
do del movimiento del mismo gráfi- 
co. 
En ambos, la línea 30 controla el 
movimiento en sentido horizontal; si 
la variable «bucle» se incremento, el 
gráfico se desplaza hacia la derecha, 
si se decrementa, hacia la izquierda. 
Las líneas 40 y 50 posicionan el cur- 
sar y mueven el gráfico, mientras que 
el FOR...NEXT determina la coorde- 
nada X de impresión. La Y es la mis- 
ma para ambos programas, de for- 
ma que el movimiento transcurra en 
la misma fila. 
PRINT CHR$ (n) imprime el carác- 
ter cuyo código ASCII es n. Probar 
con otros números, de 32 a 255. 
Todavía no tenemos lograda la 
verdadera animación, pues la figu- 
ra deja un desagradable rastro al 
desplazarse. Estas dos líneas, añadi- 
das al progrma 3 ó 4, lo remediarán: 
64 LOCA TE bucle, 12 
66 PRINT CHR$(32) 
Sucede que, después de pintar el 
gráfico, la línea 66 pinta un espacio 
en blanco en la misma posición, bo- 
rrándolo, y sugiriendo animación de 
verdad. 
El método es: pintar el gráfico, bo. 
rrarlo y volerlo a pintar en la posi. 
cián siguiente. 
Esta rutina de «ahora /0 ves, aho- 
ra no los ves» funcionará sólo si la di- 
ferencia entre sucesivas posiciones 
de impresión no es demasiado gran- 
de, y la variación de dicha posición 
es lo suficientemente rápida, aunque 
no MUY RAPIDA. Por eso la línea 
66, la que borra, se ejecuta después 
del retardo de la línea 60. Probar 
ambos programas sin ella, demostra- 
rá una vez más la importancia del 
«tercer ingrediente». 
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PRO 
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1 e REM ProQrama 1 10 REM Pl"'ogl"'ama 5 
20 MDDE 1 20 MODE 1 
30 LOCATE 10,14 30 FOR bucle%=1 TO 39 
40 PRINT"EJemplo de mov Imi ento ll 40 LOCATE bu c 1 e% , ! 2 
50 LOCATE 1,25 50 PRINT CHR$(32)¡CHR$(250) 
60 FOR bucle% 1 TO 20 60 FOR r-etal"'do%=1 TO 40:NEXT l"'et«l"'d 
70 PRINT CHR$ ( 1 0) ¡ 0% 
S0 FOR l"'et«l"'do%=1 TO 50:NEXT I"'etal"'d 70 NEXT bucle% 
0% 
96 NEXT bucle% 
10 REM Pl"'ogl"' ama 6 
20 MODE 1 
10 REM Pl"'ogl"'am« 2 38 FOR buc I e%=39 TO 1 STEP -1 
20 MODE ! 40 LOCATE bucle%,12 
30 LOCATE 10,14 50 PRINT CHR$(251);CHR$C32) 
40 PR 1 NT" Ej emp l o de movimiento" 60 FOR l"'etal"'do%=1 TO 40:NEXT I"'etal"'d 
50 LOCATE 1, I 0% 
66 FOR bucle%-¡ TO 26 70 NEXT bucle% 
70 PRINT CHR$( 11): 
S8 FOR I"'etal"'do% 1 TO 56:NEXT I"'etal"'d 
0% 10 REM Pl"'ogl"' ama 7 
96 NEXT bucle% 20 
IODE 1 
30 FOR vertical%-I TO 24 
40 LOCATE 19,ver-tical% 
10 REM Pl"'ogl"' ama 3 58 PRINT CHR$C249\ 
20 MODE 1 60 FOR I"'etal"'do%-I TO 60:NEXT I"'e tal"'d 
30 FOR bucle%=1 TD 'lB 0% 
40 LOCATE buc l e%, 12 65 LOCATE 19,vel"'tlcal% 
50 PRINT CHR$(250); 66 PRINT CHR$(32) 
60 FOR l"'etardo%=1 TO 40:NEXT I"'etar-d 70 NEXT vel"'tlcal% 
0% 
70 NEXT bucle% 


10 REM Pl"'ogl"'ama 4 
20 
1(iOE 1 
30 FOR bucle%-40 TO 1 STEP -1 
40 LOCATE bucle%,12 
50 PRINT CHR$(251)¡ 
60 FOR l"'et«l"'do%-1 TO 40:NEXT I"'etal"'d 
o;
 
7e NEXT bucle% 


10 REM ProQl"'am« 9 
20 MOOE 1 
30 x=1 :Y=I 
40 FOR derecha=1 TO 39 
50 x=x+1 
66 GOSUB 210 
70 NEXT del"'echa 
80 FOR abajo=1 TO 23 
ge y Y+l 
100 GOSUB 210 
110 NEXT ¡¡baJo 
120 FOR izquler-da=1 TO 39 
130 x=x-l 
148 GOSUB 218 
150 NEXT Izqulel"'da 
168 FOR ar-r-iba=1 TO 23 
1 70 y Y-I 
IS8 GOSUB 218 
190 NEXT al"'l"' i ba 
200 END 
210 REM impl"'lme gr-aflcc, esper-. y 1 
o bol"' 1"' a 
228 LOCATE X,) 
230 PRINT CHR$(24S) 
240 FOR r-etal"'do=1 TO 40:NEXT r-etard 
o 
250 
260 
270 


Para que lus dedo. 
no reakcen e/trabaJo duro, M.H. AMS- 
TRAD la hace por 11: Todas los 1t;lodas que induyan 
este logohpo se encuentron o tu disposición en un cas- 
se
e mensual salidlonoslo_ 


10 REI'I Pl"'ogl"' ama 8 
28 MODE I 
30 FOR vel"'tical%=24 TO 1 STEP -1 
40 LOCATE 19,vel"'tical% 
58 PRINT CHR$(249) 
60 FOR I"'etal"'do%-I TO 68:NEXT I"'etal"'d 
0% 
65 LOCATE 19,ver-tical% 
66 PRINT CHR$(32) 
70 NEXT ver-tical% 


10 REM Pl"'oQrama 10 
20 /'10(>E 1 - 
30 x=10:Y=10 
40 FOR arr Ibader-echa=1 TO 5 
50 x=x+l :/=)1-1 
60 GOSUB 210 
70 NEXT al"'l"'lbadel"'echa 
80 FOR ab.joder-echa=1 TO 4 
90 x=x + 1 : y=y+ 1 
100 GOSUB 210 
110 NEXT abajodel"'ech
 
120 FOR Izquiel"'daabaJo-I TO 4 
130 x x-I :Y=)'+I 
140 GOSUB 210 
150 NEXT Izqulel"'daabaJo 
168 FOR izquiel"'daarl"'lba 1 TO 4 
170 x=x-I :Y-Y-I 
180 GOSUB 210 
190 NEXT Izqulel"'daal"'l"'lba 
200 END 
218 REM impl"'lme gl"'afico, espel"'a y I 
o borl"'a 
220 LOCATE X,y 
230 PRINT CHR$(248) 
248 FOR retardo-l TO 40:NEXT I"'etard 
o 
250 LOCATE X,y 
26e PRINT CHR$(32) 
270 RETU"N 


le REM Pl"'ogl"'ama 11 
20 MO('E 0 
30 WHILE 1=1 
40 LOCATE 10,12 
50 PRINT CHRtC INT(4..RND': 1) )+248) 
60 FOR l"'etu-do%-1 TO 'le :NEXT I"'etal"'d 
0% 
7e WEND 


Sin ella, la rutina pasaría a ser del 
tipo «ahora no lo ves, ahora lo ves 
con un poco de suerte»¡ un desastre. 
Los programas 5 y 6 también ha- 
cen el mismo trabajo, pero con una 
gran diferencia: la línea 50. ¿Secom- 
prende por qué funciona? 
Espero que sí, pero por si acaso, 
lo que pasa es que, a cada ronda del 
bucle, no sólo se pinta el gráfico, si- 
no un espacio en blanco inmediata- 
mente después de él. Al cambiar la 
posición de impresión, el espacio bo- 
rra el gráfico. Así nos ahorramos las 
líneas 64 y 66 de los programas 3 y 
4. 


Nótese que el espacio viene antes 
del gráfico en el programa 5, y des- 
pués en el 6, lógicamente. 
¿Lógicamente? ¿Alguien puede de- 
cir por qué? 


Movimiento en todas 
, direcciones 


Una vez comprendido todo esto, 
el movimiento arriba y abajo es un 
juego de niños. En lugar de modifi- 
car la coordenada X, cambiaremos 
la Y. Incrementándola, hacia abajo, 
decrementándola, hacia arriba. 
De todas maneras los programas 
7 y 8 lo hacen. 
Se diferencia de los números 5 y 6 
en que aquí tenemos que usar dos 
sentencias PRINT, líneas 50 y 65. Si 
no, no funcionarían (compruébese). 
El programa 9 usa movimiento 
vertical y horizontal -no al mismo 
tiempo, claro- para desplazar un 
carácter alrededor de un cuadrado. 
La subrutina de las líneas 210-270 
pinta, espera y lo borra. Es llamada 
cuatro veces, líneas 60, 100, 140 Y 
180, para cubrir las trayectorias de- 
recha, abajo, izquierda y arriba, res- 
pectivamente. 
Hasta ahora, el movimiento siem- 
pre ha sido en línea recta. Los des- 
plazamientos en diagonal son muy 
fáciles de conseguir: simplemente 
hay que alterar a la vez las coorde- 
nadas horizontal y vertical (X e Y) de 
impresión (programa 70). 
Esto es casi todo por ahora. Como 
se ha visto, la animación no es tan 
difícil como parece. Pronto, los colo- 
res llenarán de vida ese movimiento. 
Para finalizar de veras, un poco de 
diversión en forma del programa 11. 
¿Podéis predecir lo que hace? 
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COMANDANTE lORITA, 13 
28003 MADRID 


AMSTRAD 464 Verde 
AMSTRAD 6128 
DISKETTE 3" 
INTERFACE DISCO 5.25" 
CINTA G-15 ESPECIAL ORDEN 


57.900 ptas. 
99.900 ptas. 
895 ptas. 
5.900 ptas. 
85 ptas. 
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SOFTWARE ENTRETENIMIENTO (CASSETTE) 
COMBA T L YNX 
DEA T PIT 
ALlEN-8 
KNIGHT LORE 
HARRIER ATTACK 
JUMP JET 
SIMULAD. VUELO 737 
FRUIT MACHINE 


A MIS T I)!A\D 
1 495 PUs 


1.925 ptas. 
1.925 ptas, 
1.875 ptas. 
1.875 ptas. 
995 ptas. 
2.695 ptas. 
1.79
 ptas. 
995 ptas. 


LIBROS 
CURSO AUTODIDACTICO BASIC AMSTRAD 
(Contiene manual y dos cassettes) 
HACIA LA INTELIGENCIA ARTIF. 
40 JUEGOS EDUCATIVOS 
MUSICA y SONIDO PARA AMSTRAD _ 
PROGRAMANDO CON AMSTRAD 


1 975 Ptas 


2.695 ptas. 
1.300 ptas. 
1.800 ptas. 
1.300 ptas. 
1.900 ptas. 
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Tu pedido lo puedes recibir contra-reembol. 
so (libre de gastos), llamando a los teléfonos 
(91) 2330735 Y (91) 2330781. 


AMSTR
D 
1.795 Ptas. 


TELS,: (91) 2330735 
(91) 2330781 
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EL HOMBRE DE A LLAVE INGLESA 
srANNERMAN 


AMSTRAD 
1 
95 Ptas 
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La Feria del Sonido y de la Imagen siempre ha entrado en la 
categoría de «magnos certámenes» con toda la ra ón. En 
efecto, r.esulta un gran acontecimiento para el mundo de' 
sonido y la imagen que los mayores fabricantes del sector 
presenten anualmente sus novedades y, al menos, parte de 
sus ideas y ro'yectos. 


n este mundillo, el . rdena- 
dor o upa un lugar un poco . e
pla- 
za. Oí la informática nunca ha sido 
la prima donna del Sonimag, y en la 
ed'ción de este año, repr:se Itaba 
aproximadamente un 10 pu l' O de 
la 'xtensión de la feria. 
No obstante, esta penur ia Je es- 
pacio, las marcas más impertantes o 
al menos las que más suer an, esta- 
ban presentes rivalizando por atraer 
la atención del público hacia sus 
stands. 
La descripción detallad lo de toda 
la feria r
quería casi un libro en lu- 
gar de un artículo; vamos a intentar, 
no obstan e, pasar revista :0 que 
sucedió en el Sonimag desde el pun- '---- 
lo de V'5la 
e la ;nfo,mál;w. I 
I Lo n 
 evo de Sinclair I :< 
Sine/air Research, o lo que es lo ' 
mismo en Esp. ña, I nvestrónica, pre- 
sentó el flamante Spectrum 128 K. 
Sine/aír ha reaccionado rápida- 
mente ante los augures que vaticina- 
ban su inminente c
ída y, haciéndo- 
se eco de las exige Icias actuales del 
mercado, se ha unido a Id carrera de 
los 128 K con una excelente máqui- 
na, comparada con el Spectrum Plus, 
su antecesor. 
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Esta máquina puede funcionar. n 
modo 64 y 128 K, y se garantiz. la 
absoluta compatibilidad del softw. 
re Spectrum para el nuevo inv' nt . 
Se ha remodelado el Basic y 11; . un 
editor de Pdntalla completo, además 
de una puerta de comunicación se- 
rie y una interface MI DI, capaz de 
conectar con cualquier instrumento 
musical compatible con ese protoco- 
lo. 
Hay más novedades de Investró- 
nica, casi tan excitantes como el nue- 
vo Spectrum 128 K. 
La impresora BX 1000, por ejem- 
plo, es una de ellas. 
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De matriz de puntos, puede alcan- 
zar una velocidad de 100 caracteres 
por segundo y se conecta con el 
mundo exterior mediante una inter- 
face serie RS232, pensando en los 
Spectrum y en el QL. Como todas las 
impresoras, puede usar una gran 
cantidad de tipos de letra distintos, 
espaciado proporcional, etc. 


Ql: presente I 
Hablando del QL, este excelente 
ordenador ha sufrido hasta hace po- 
co un trato desfavorable, de forma 
totalmente inmerecida. 
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En efecto, esta máquina, tecnoló- 
gicamente hablando, es la más 
avanzada que existe de su catego- 
ría; tal vez los microdrives y la insis- 
tencia de presentarlo al público co- 
mo un ordenador profesional hayan 
sido los responsables. 
En este sentido, I nvestrónica apor- 
ta una unidad de disco para el Ql, 
en formato de 3,5 pulgadas, capaz 
de formatear 720 Kbytes y un sustan- 
cioso aumento en los programas dis- 
ponibles hasta ahora para el orde- 
nador, consistentes casi exclusiva- 
mente en cosas como lenguajes, sis- 
temas operativos y ensambladores. 
Tendremos disponible una contabili- 
dad, un programa de historiales clí- 
nicos, etc. 
Por último, Investrónica presentó 
también su aula informática, en la 
que un ordenador maestro controla 
hasta 64 Spectrum o QLs, pudiendo 
intercambiar información entre ellos 
de todo tipo. 


La versatilidad 
digitalizada 


Commodore estuvo presente natu- 
ralmente en Sonimag, con su nueva 
estrella, el Commodore 128 K. 
Una vez más, se trata de una gran 
máquina, soberbiamente diseñada, 
conjuntando perfectamente funcio- 
nalidad y belleza, que tiene nada 
menos que tres procesado res distin- 
tos y es capaz de funcionar bajo el 
sistema operativo CP/M. 
Posee las tradicionales buenas 
cualidades de los ordenadores Com- 
modore en sonido y gráficos, junto 
con un Basic potente, sencillo de ma- 
nejar (para variar), y cuenta con el 
aval de una de las marcas punteras 
del mundo de la informática casera 
y con 
I de poseer tal vez los mejo- 
res juegos o al menos los más cuida- 
dos y espectaculares que se han he- 
cho nunca. 
También tuvimos ocasión de admi- 
rar los periféricos que pueden conec- 
tarse a la máquina, entre otros una 
unidad de disco mucho más rápida 
que la malhadada 1501. 


Atari: el no va más 


Pasemos ahora a lo más revolucio- 
nario en tecnología que hemos visto 
en mucho tiempo, su nombre: Atari. 
Atari, con la llegada de T ramiel 
(fundador de Commodore) «al po. 
der», se ha reformado completa- 
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mente y ha emprendido, esperemos 
que con éxito, la tarea de remode- 
lar completamente su parque de or- 
denadores, bajo el lema: «Poder sin 
precIo.» 
Presentó dos modelos: uno de 128 
Kbytes de RAM, el 130, excelente- 
mente dotado para el manejo de 
gráficos y sonido, completamente 
compatible con todo el software Ata- 
ri anterior y una completa gama de 
periféricos, entre unidades de discos, 
impresoras, etc. 
Pero sin duda, la vedette de Atari 
es el modelo 520ST. 
Esta máquina está inspirada en el 
concepto del Apple Maclntosh y su 
concepción es absolutamente revo- 
lucionaria: un microprocesador de 
32 bytes, 512 K de memoria RAM, 
un sistema operativo basado en ico- 
nos y ventanas, que hace innecesa- 
rio el estudio de manuales para su 
manejo, una resolución gráfica y ve- 
locidad de proceso impresionantes, 
un diseño precioso, en fin, nos dejó 
verdaderamente atónitos. Es lástima 
que el 520ST cojee momentánea- 
mente en el campo del software dis- 
ponible para él. 
Esperemos que muy pronto esta 
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carencia se remedie y las casas de 
software se animen a escribir aplica- 
ciones usando el GEM, sistema ope- 
rativo del Atari, serán dignos de ver- 
se. 
Ni que decir tiene que este orde- 
nador iba cumplidamente acompa- 
ñado de los periféricos necesarios, a 
saber, impresores y una unidad de 
disco de un Megabyte. Una jota. 
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Dragón: tecnología 
española 


Dragón también estuvo presente: 
el Dragón 200 y el Dragón MSX 
constituyen unas interesantes nove- 
dades que deseamos tengan el éxito 
que merecen y potencien la investi- 
gación, desarrollo y fabricación de 
ordenadores en nuestro país. 


Amstrad 1 28: la 
estrella (con perdón) 


En cuanto a los ordenadores, nues- 
tros lectores se preguntarán a qué 
esperamos para hablar de Amstrad. 
Bueno, el stand no era fácil de des- 
cubrir debido a la enorme cantidad 
de gente que lo cubría (al menos, el 
día en el que nosotros estuvimos allír 
observando «como locos» toda la 
gama Amstrad, pero especialmente 
el128 K, cómo no. De él no decimos 
nada más porque se le describió con 
profundidad en AMSTRAD Semanal 
número 3. Tuvimos oportunidad de 
observar un incremento significativo 
de programas para estas máquinas, 
especialmente software en disco. 
No todo iba a ser ordenadores en 
el Sonimag. Las casas de software tu- 
vieron un activo protagonismo. 


Imágenes por 
ordenador 


Entre las muchas novedades que 
hubo, debemos destacar un gran 
programa creado para el Spectrum 
(versión Amstrad en preparación) 
por Pin S. A.: un digitalizador de 
imágenes. 
Es decir, nosotros introducimos 
una fotografía en un aparato seme- 
jante a un scanner y dos minutos des- 
pués aparece en la pantalla del 
Spectrum lista para ser manipulada 
casi, casi como queramos: amplia- 
ción vertical y horizontal, control de 
contrastes, etc. 
El software responsable de esto 
puede funcionar en un entorno de 
cassette, microdrive o unidad de dis- 
co Discovery l. Una gran idea a un 
costo razonable. 


Sonimag85 
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Tus copias no pastarán 
en mi rancho 


La piratería también estuvo pre- 
sente en el Sonimag, pero de forma 
un tanto insólita; una nota de pren- 
sa comunicaba que una serie de em- 
presas de software se constituían en 
«asociación empresariahl, con idea 
de cumplir varios fines etiquetados 
de muchas formas y resumibles en 4 
palabras: muerte a los piratas. 
En este controvertido tema, una 
iniciativa interesante. Veremos has- 
ta qué punto es efectiva. 


I 


, 
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Recu
riendo a un tópico, diríamos' 
que «Nada nuevo bajo el sohl. 
No quisiéramos que esto se enten- 
diera como un epitafio al Sonimag, 
ni como un comentario despectivo, 
pero la verdad es que ha habido po- 
cas cosas realmente desconocidas. 
Lo que era nuevo en nuestro país, ha 
sido analizado y desmenuzado por 
las revistas especializadas, y en el So- 
nimag nos hemos podido dar el gus- 
to de ver/o con nuestros propios ojos. 
No queda sino agradecer la exis- 
tencia de las ferias informáticas y de- 
sear que se multipliquen rápidamen- 
te para beneficio del consumidor. 
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ELIPSES 


rn nális is 


En esta o(asión Análisis entra en el (ampo de la representadón de fun(iones¡ más (on(retamente de 
fundones del tipo elipse. 
Con este programa podemos situar el (entro de la elipse en (ualquier punto de la pantalla
 
definiendo además los ejes de la (ónÍ(a. Dándole el mismo valor al eje horizontal que al vertÍ(al 
obtendremos una (ir(unferen(ia. 


10 REM, que contiene ellítulo del progra- 
ma. 
20 Cambia el color de la tinta de amari- 
llo a blanco, 
30 Limpia la pantalla, para proceder a la 
representación de nuevas elipses. 
40 Coloca el ordenador en el modo 2, de 
80 carocteres por línea, 
50 Hace que el ordenador calcule en gra- 
dos el valor de los ángulos utilizados en nues- 
tras operaciones. 
60 Mensaje de información en pantalla. 
70-80 Dos INPUTs que permiten introdu- 
cir el valor de las coordenadas X e Y del cen- 
tro de la elipse. 
90 Otra línea de información en pantalla. 
100-110 Los INPUT s que definen los va- 
lores de los ejes de la elipse. 
120 Limpia de la pantalla toda la informa- 
ción anterior, dejándola lista para el trazado 
de la curva. 
130-160 Un ciclo FOR...NEXT que varía 


entre O Y 360, con un intervalo de 0,6, es de- 
cir, que rota 36010,6=600 veces. 
140 Inicializa el cursor gráfico en un punto 
de la pantalla, en caso de omitir esta instruc- 
ción, no obtendríamos ninguna representación 
gfafica. 
150 Esta es la instrucción que verdadera- 
mente dibuja la elipse, todo lo anterior han si- 
do datos para su construcción e inicialización 
de pantalla. 
Cada vez que oscila el ciclo FOR... NEXT, 
el ángulo a toma un valor creciente, que se 
incremento en cada vuelta en 0,6 unidades, 
con el cual se calculan las coordenadas X e Y 
de cada punto de la elipse, 
Al variar el ángulo desde O a 360 grados, 
cubrimos toda extensión de la cónica, cerran- 
do el contorno de ésta. 
170 Define la ventana de texto en la cual 
van a aparecer los datos representativos de 
la curva, 


\J 
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t
 Re' ELIP9EE .E EJES "ARIAEL 
20 tr'lfC '.16 
36 CL" 
46 MODE 2 

o CiEG 
ó8 PRINT'.. SJTt..itI:CJ ON OEl e 
RO DE L
 Ell pse *'.. CEl'-rr
o DE 
A PQt.ITALLA 329. 2ee ...- 
(N
U'J' ...... COORDENADA .. I 


86 1 
PUT I 
... COO
D&aA(lA , ": 
98 PRINT".... p...RAMEiROS DE. LA 
L1PSe .. 
180 INPU .,. EJE ¡.cODI ZON1'Al 
,EH 
I EJl 


180 Especifica el color del papel de la ven- 
tana y el color de la tinta en la misma, el CLS 
final los coloca en la ventana. 
180-200 Representan dentro de la ven- 
tana los datos más significativos de la elipse; 
posición de su centro, eje horizontal y eje ver- 
tical. 
220-250 Dibujan los ejes de la cónica. 
220 Inicializa el cursor gráfico, en la par- 
te izquierda de la curva. 
230 Dibuja el eje horizontal. 
240 Coloca el cursar gráfico en la zona 
inferior de la cónica. 
250 Dibuja el eje vertical. 
260 Ciclo WHILE... WEND que mantie- 
ne en pantalla la elipse y sus ejes hasta que 
pulsemos una tecla, sin él los ejes de la cónica 
se borrarían inmediatamente. 
270 Una instrucción de salto que hace que 
el programa vuelva a la línea 30, borrando 
la pantalla y permitiéndonos proceder a dibu- 
jar otra curva. 
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2 
30 FOR ") . o STEP . . 
46 Move C .c 
'0 PLOT e .EH"
Jt-h.., I ..
 '.r? 
, 
ÓO ',1 ....,. 
"O ..J!NDOW NJ ,¡t'I', l. 
:9 PAPER tll I 3:PEhI lIi .2IClS 
f'é P
JNT"I."CENTRO' t( 1(;. 
00 PRJNTMl ,'EJE HOF"<, 1::W 
10 PRINH.."EJE. 'ER. ' 
20 MOJE -20-EH,C, 
e [lRAWR Ert-lf2t40.& 
40 t1OVE, -E 
,e Di:lAWP. O) ')1I4t 
o LE r 
" . , 
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INCOGNITON 


..... 
.... 


Programa realizado por el lector: 
leonardo Gil 
(Murcia) 


ste es un programa sin gran- 
es complicaciones y con él se po- 
drán resolver y revisar operaciones 
algebráicas, tipo ecuación. 
Se puede abordar la resolución de 
ecuaciones de primer y segundo gra- 
do y una representación gráfica de 
dicho resultado casi perfecta. 
Su manejo es muy sencillo: simple- 
mente hay que poner a cada carác- 
ter algebráico el número que lo mul- 
tiplica. 


VARIABLES 
PRESENTACION 


=
 
Sa 
dr 


= Lee datas de la línea 180. 
= Lee datas de la línea 340. 
= Valor de un coseno. 
= Valor de un seno. 
(Ubican la posición del cur- 
sar formando un círculo.) 
Elige opción. Hay dos: 
- Ecuaciones de primer 
grado con dos incógnitas. 
-Ecuaciones de segundo 
grado. 
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VARIABLES 
PRIMERA OPCION 


Ecuaciones de primer grado 
J$ = Lee datas de la línea 630 a 
la 690. 
X = Da valor al número que mul- 
tiplica a la X de una de las 
ecuaciones del sistema. 
y = Da valor al número que mul- 
tiplica a la V de una de las 
ecuaciones del sistema, 
Z = Da valor al término indepen- 
diente de una de las ecuacio- 
nes del sistema. 
a = Da valor al número que mul- 
tiplica a la X de la segunda 
ecuación. 
b = Da valor al número que mul- 
tiplica a la r de la segunda 
ecuación. 
= Da valor al término indepen- 
diente de la segunda ecua- 
ción. 
ZX = Es el resultado final de la X. 
XZ = Es el resultado final de la r. 
bu - 
mt - Son las coordenadas «V» va- 
= riantes de las dos rectas. 


e 


Sd 


= Es la coordenada «X» varian- 
te de las dos rectas. 
= Sitúa la ubicación del cursar 
para imprimir el resultado 
gráfico final. 
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VARIABLES 
SEGUNDA OPCION 


Ecuaciones de segundo grado. 
g$ = Lee datas de la línea 1.270 
a la 1.290. 
X = Da valor al número que mul- 
tiplica a la X al cuadrado. 
Xp = Da valor al número que mul- 
tiplica a la X. 
t '= Da valor al término indepen- 
\ diente. 
bu =. Coordenada variante de la r 
de la parábola. 
cr = Coordenada variante de la r 
de la recta. 
d = Coordenada variante de la x 
de la recta y de la parábola. 
KI = Coordenada r de la recta (di- 
qujo). 
IQ = Coordenada r del dibujo de 
la parábola. 
= Coordenada X del dibujo de 
la recta y de la parábola. 
Sd = Ubica la 'posición del cursar 
para imprimir el resultado 
gráfico. 
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10 GOTO 4(1 
20 IF ERR=6 THEN CLS:CLEAR:RESTORE 
630:LOCATE 2?,12:PRINT "** VALORES 
NO APTOS **" :FOR GU=l TO 3000:NEXT: 
GOTO 440 
30 IF ERR=ll THEN CLS:CLEAR:RESTORE 
630:LOCATE 28.12:PRINT "** DIVISIO 
N POR CERO **" :FOR GU=l TO 3000:NEX 
T:GOTO 440 
40 1"10DE 2 
50 80RDER 6 
¿,0 INV 0,0 
70 I!,.j¡< 1, 2¿, 
81J LOCATE 30, 1 
90 FOR th=l TO 103 
100 IF th=23 THEN LOCATE 10.3 
110 IF th=28 THEN LOCATE 10,5 
120 IF th=72 THEN LOCATE 10,7 
130 FOR kj=l TO 12:NEXT 
140 READ d"t. 
1 5 (1 P R 1 NT d'$; 
16(1 SOUND 1,200, 1 ,5 
170 NEXT 
1 8 0 DATA *, * E, C . IJ , a , C , i , o , n , E' , ':. rTt, 
a,.t.e.m.a.,t, i ,C,.3..
. *,*,t"I,e,n,IJ,-,1 
':"'
R,
,
.,o,l ,IJ,C, i ,(i,n d,e e,C,IJ,.3., 
e '11 i . o . n .. Ea . s. d.. €' p, r- , i , m , e , r 9, r. , .:c. . d 
C ' , L - c ', r ' l d . " , 
. i , n ' e , o , q , n , i , t , .3. , .:. . 
, " , - . - . ., - . ... 
2 -,P!,e,'s.o,l ,IJ,C, i ,o,n d,e e,c,u,a 
..e, i ,o,rr!le,s d!l€' :.,e,I;¡,u,n,d,o I;¡,r', 
a.d,o 
190 RE:=;TOF.:E :340 
200 FOR a=l TO 40 
210 sa=40+(35*COS(a») 
220 dr=16+(5*SIN(a» 
230 IF dr<10 THEN 210 
240 LOCATE sa,dr:PRINT a 
25(1 :::;OUND 1,450, 1 , 7 
260 t'.JEXT 
270 LOCATE 60.24:PRINT "-0- Para sa 
1 ir'" 
280 LOCATE 10,24:FOR bu=l TO 15 
290 SOUND 1,3(1 t1 , 1 ,4 
300 FOR SL=l TO 10:NEXT 
310 READ g'$ 
320 PR Ir'H g'$; 
3:31J NE>::T 
340 DATA 1 ,N,T,R,O.D,U,=,C,A O,P,C, 
1 , O ,N : 
350 1 t'.JPUT a 
360 CLS 
370 IF a=1 THEN RESTORE 630:GOTO 44 
tI 
380 IF a=2 THEN RESTORE 1270:GOTO 1 


i 
t 


l. 
t- 
l 


1513 


390 IF a=O THEN CLS:CLEAR:80RDER 1: 
INV IJ.l:INI< 1,24:1...jEI)J 
400 RESTORE 420. _ _ 
410 
LS:LOCATE 32,12:FOR th

_TU 1
 
:REA
 q$:PRINT g$; :SOUND 1 ,
uu,l .4. 
0,0:FO
 sl=1 TO 10:NEXT:
EX

F
R - 
1 TO 1500:NEXT:RESTORE 1
0:bUTu 40 
420 DATA N,o c,o,m,p,r,e,n,d,o 


S erie Oro 


4 ::;::13 G OT o '7'0 
440 ORIGIN 0,0:CLS:LOCATE 15,1 :CN E 
RROR GOTO 20 
450 FOR th=1 TO 212 
460 READ j$. 
470 PRINT j"$.; 
4 tW S O UN DI, 3 o 0 . 1 ,4: F o R 
 1 = 1 T o 2: I'..J 
E><T 
4<;'0 1 F 
50u 1 F 

dO IF 
520 1 F 
530 1 F 
540 1 F 


th=35 
t h=55 
t h=75 
t h=EW 
t h='7'4 
th=10:::: 


THEI,j LOCATE 
THEt.J LCICATE 
THEI'..J LOCATE 
THEI..J LC:rCATE 
THEI'.J LOCATE 
THEN lI'-..JPUT 


45, '
1 


45,8 


r= .-, 
,_1.. ..:' 


7 .,. 
I , ,_, 


7 
 
I , ,.' 


x:LOCATE 7 


, , 


550 


IF th=121 THEN INPUT y:LOCATE I 


, 1 1 
5¿,0 


IF th=146 THEN INPUT z:LOCATE 


, 1 :3 
570 IF th=161 THEN LOCATE 7,15 
580 IF th=174 THEN INPUT a:LOCATE , 
, 1 7 
590 IF th=187 THEN INPUT b:LOCATE 7 
,1'7- 
,
.O (1 t',JEXT 
Ó10 INPUT e 
.' ':00 F
E
:;TORE ¿,:;::O 

;o DATA *,* E,C,U,A,C,I ,O,N,E,S D, 
E P,R,I,M,
,R G,R,A,D,O C,O,N D,O,S 
1 ,N,C,O,G,I".J,I ,T,A,S *,*,P,Ct,n.e,r' 
1,20. e,c,IJ,.Oo.,c, i ,o,rr e,n 1 ,a. m,a.,n,e 

r,a
Y = X +
- t,e,r 
,
AO RE:3TORE .::.50 
,
5 (1 DA T A , m, i , n ,o:. i, n , d , e , p , e , d , i , e 
,n,t,e,D,.3.,t,O,':' -,P,r', i ,m,E',r,a. e, 
c,u
a,c
 i ,o,n - 
¿,,::.
J RP:;TORE 6 7
J 
,::,70 DATA . A . r. , ';1 , u , m . e , n , t , Ct d, el, a 
o"'J.:::<'I'
'" -,A,
',g,u,rTl,e,n,t,o d
e 1,a 
n , 
( , .:- _, l.) . .3. . 1 ,0. r' d, E' , 1 t, e , r' , rn, i , n 
,0 i .n,d,e,p,e.rr,d, i ,e,rr,t,e - 
¿.8(1 RE:=;TORE ¿S0 
690 DATA .S.e.g
u,n,d,a e
c,u,a
c, ¡ 
,o "n -,A

',g,u,m,e
n,t,o d
e 1,a .-
-
 

,
 -,A
r,g
u
m,e,n,t,o d
e 1 'la 
,Y 

N _,I.),.
., 1 ,o
r' d,e 
7
J 
J RE:::;TORE 71[1 
7 1 
J DA TAl t, e , r. , m, I , n ,o:. i, n . d , e , p , 
e.n,d, i ,e,n,t,e 
720 n= ( x ) *' ( b) : 1.,)= ( z ) * ( b) : ITI= ( ..=t.) '* ( y) : -::. 


=(C)*(
.') 
7:;::(1 h=-(')+(':;) :.j=-(n)+(m) 
740 zx=-(h)/(j) 
7'::,0 LDCATE 5, 21 
 F'F: 1 t...JT ;" El r E':.IJ 1 t ad 


o e ': :;<= 11 :; Z x 
760 )
z=«(x)
(z
»)+(z»)/(y) 
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770 LOCATE 21,22:PRINT "Y=":xz 
780 FOR q=1 TO 3500:NEXT 
790 CLS:LOCATE 30,12:PRINT "Represe 
n tae i on Gr'af i ea" : FOR t=1 TO 2500 :t',JE 
XT:CLS 
800 CU:; 
810 PLOT 320,0:DRAW 320,400:PLOT O, 
200:DRAW 640,200:0RIGIN 320,200 
820 FOR xe=-200 TO 200 STEP 20 
830 PLOT l,xe:PLOT -1,xe 
840 PLOT xe,2:PLOT xe,-2 
850 NEXT 
8¿,0 LOCATE 1,25: PF: H-H "E:.p er' e por' f 
a
,' or' " 
870 <;:.d= 1 
880 FOR w=-1000 TO 1000 STEP 10 
890 f=1*20 
900 k1=bn*20 
910 hx=mt*20 
92£1 1 =1,i,I/l O ti 
930 bn=«x*l)+z)/y 
940 mt=«a*l)+c)/b 
958 IF bn>10 THEN 1030 
960 IF bn<-10 THEN 1030 
970 po=INT(zx*100) 
980 FOR yt=1 TO 10 
990 IF w=po+yt THEN GOTO 1080 
1000 NEXT 
1010 LOCATE 63,1: PRINT ¡ ")(=", usa,m 
"##.##";1 : LOCATE 63,3:PRINT;"Y=", U 
SING "##.#tt" ¡bn 
113213 PLOT f,k1 
1030 IF mt>10 THEN 1100 
113413 IF mt<-10 THEN 1100 
1050 PLOT f,hx 
10¿,0 LOCATE 63,5:PRINT;"X=", USING 
"##.##"; 1 :LOCATE 63, 7:PRINT; "Y=" ,U'::; 
ING"##.##"jmt 
1 070 GOTO 1 0'7'13 
1080 PLOT f, 1< 1 : DF:AI.....! f, ti: F'LOT f, k 1 : D 
RAI.....I 0, k 1: LOCATE 1, :.,j: PRINT; "X=" ; zx 
:LOCAiE 1 ,sd+2:PRI
T;"Y=";xz:sd=sd+ 
4:S0UND 1,213,20,15,0,0,1 
1 ti 90 REt-'1 
1100 NEXT 
1110 b$=INKEY$:IF b$="a" OR 
$="A" 
THEN RESTORE 630:GOTO 440 
1120 1 F b$="m" OF: b$="t"1" THEN F:E':::TO 
RE :GOTO 413 
1130 LOCATE 1,25:PRINT" 
Pulsa -A- para nuevo caJcuJo o 
'-'1'1- par'a 'Jer- menu." 


Para que lus dedo. 
no realicen ellrobora duro, M.H. AMS- 
TNAO lo hace por li. Todos los lisiados que incluyan 
esle logolliJo se encuenlran a lu d,sposiÓon en un cos- 
seffe mensual, so!JÓlonDslo. 
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1 1 40 G OT CI 1 1 1 13 
1150 CLS :LOCATE 2¿',1 :ON ERROR GOTO 
1410 
1160 FOR th=O TO 121 
1170 READ g$: PRINT 9"
' j 
1180 IF th=22 THEN LOCATE 45,4 
1190 IF th=42 THEN LOCATE 45,¿' 
1200 IF th=63 THEN LOCATE 5,3 
1210 IF th=68 THEN LOCATE 7,5 
1220 IF th=83 THEN INPUT x:LOCATE I 


...,. 
, ( 


1230 IF th=9¿' THEN INPUT xp:LOCATE 


7 r, 
, '7 


1240 :::=:OUt'..j[) 1,300,1 ,5:FOR :.J=1 TO 3: 
t'..JE><T 
1250 NEXT:INPUT t 
1260 RESTORE 1270 
1270 DATA *,* E,C,U,A,C,I ,O,N,E,S D 
,E S,E,G,U,N,D,O G,R,A,D,O *,*,P,o, 
n,e,r- J ,a e,e,u,
.,c,i ,0, n e,n 1,a m 
,a,n,e,r,.
.,>
,".,2 +,- >< +,- T,., i ,n, 
d,e,p,e,n,d, i ,e,n,t,e 
1280 RESTORE 1290 
1290 DATA ,= 0,D,A,T,O,S -,A,r,g,u, 
m,e,n,t,o d,e 1 ,.=-. '
',><,o,2,'
' -,A,r',g 
,u,m,e,n,t,o d,e- J,a ",X," -,\),.:o.,J, 
o,r- d,e,l t,e,r',m, i ,n,o i ,n,d,e,p,e 
,n,d,i,e-,n,t,e - 
1300 zx=(-xp+SQR«xp"2)-(4*x*t»)/( 


2*:
 ) 


1310 xz=(-xp-SQR(xp"2-(4*x*t»)/(2* 
x) 
1:::20 LC)CATE 7,12:PRINTj"Los. r'es.uJ ta 
dos de la -x- son II;zxl'y I';XZ 
1330 FOR :.d=1 TO 3500 
1340 NEXT 
1350 CLS:LOCATE 30,12:PRINT "Repre-s 
entacion Grafica" :FOR me=1 TO 2500: 
NEXT:CLS 
1360 CLS 
1370 ORIGIN 0,0:PLOT 320,0:DRAW 320 
,400:PLOT 0,200:DRAW 640,200:0RIGIN 


320 
 2
3 (1 


1380 FOR xe=-200 TO 200 STEP 20 
1390 PLOT l,xe:PLOT -l,xe:PLOT xe,2 
:F'LOT xe,-2 
1 4t3 O GCnO 1440 
1410 IF ERR=5 THEN MODE 2:L0C
TE 30 

13:PRINT "ERROR: RAIZ NEGATIVA" :CL 
EAR:FOR h=1 TO 3000:NEXT:RESTORE 12 
70 : C30TO 115£1 
1420 IF ERR=11 THEN MODE 2:LOCATE 2 
9,13:PRINT "** DIVISION POR CERO ** 
":FOR H=1 TO 3000:NEXT:CLEAR:RESTOR 
E 1270:GOTO 1150 
1430 IF ERR=6 THEN MODE 2:LOCATE 30 
,13:PRINT "** VALORES NO APTOS **": 
FOR H=1 TO 3000:NEXT:CLEAR:RESTORE 
1 27¡j : GCnO 1150 
1440 NEXT 
1450 LOCATE 1,25:PRINT "Espe-re por 
f a.I
J oro ti 



S erie Oro 


1460 :.d= 1 
1470 IF x>0 THEN sm=zx:po=xz 
1480 IF x<O THEN sm=xz:po=zx 
1490 FOR w=-800 TO 800 
1 5 f1 \3 1 =1.>.../ 1 11 ti 
1510 bn=:>:*< 1 .'. 2) 
1520 cr'=-xp*< l::o-t 
1530 k 1 =bn *20 
1540 1 q=c r. *20 
1550 1u=INT(zx*100) 
1560 h1=INT<xz*1(0) 
1570 f=1*20 
1580 IF w=lu THEN 1690 
1590 IF w=h1 THEN 1690 
1600 IF bn>10 THEN 1640 
1610 IF bn(-10 THEN 1640 
1620 LOCATE 63,1 :PRINT"X=", USING " 
ijij.#W ' ; 1 : LOCATE 63,3:F'RINT"Y=", U::::; 1 

,JG "##.##" ;bn 
1 ,::.
:0 PLOT f, k 1 
1640 IF cr>10 THEN 1720 
1650 IF cr<-10 THEN 1720 
1660 LOCATE 63,5:PRINT;"X=", USING 
"#ij.#ij";l :LOCATE 63,7:PF:INT;"Y=", U 
:3H.m "##.##" ;cr' 
1 670 P L OT f, 1 q 
1680 GOTD 1720 
1690 IF sd=1 THEN PLOT f,K1 :DRAW f, 
O:PLOT f,k1 :DRAW 0,K1 :LOCATE l,sd:P 


R 1 NT ; "::< 1 =" ; po: 
:our'JD 1,20,20, 15,0 , o , 
1 
1700 IF sd=3 THEN PLOT f,K1 :DRAW f, 
o : PLOT f, k: 1 : DRAL
I 0,1< 1 : LOCATE 1, :.d: P 
R 1 NT; "::<2=" ; s.m: SOUND 1,20,20, 15, ti, 0, 
1 
171(1 :.d=:.d+ 2 
1 720 r'..JEXT 
1 7
:l3 b'
,= 1 NI<EY
. : 1 F b1.=" a" OR b'
,=" A" 
THEN RESTORE 1270:GOTO 1150 
1740 IF b$="m" OR b$="M" THEN RESTO 
RE 180: GOTO 4(1 
1750 LOCATE 1,25:PRINT;" 
Pulsa -A- para nuevo calculo 
o -
r para ver menu" 
17'::'0 GOTO 1730 
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MICROHOBBY AMSTRAD SEMANAL 


LE OFRECE AHORA SUS PROGRAMAS 
YA GRABADOS, PARA QUE VD. 
NO TENGA QUE TECLEARLOS 


Todos los programadores y aficionados a la microinformática sabemos lo tedioso y 
propenso a errores que resulta el teclear un listado de un programa. Para facilitar tu 
labor al máximo y que no tengas que estar horas sobre el teclado de tu ordenador 
tratando de descifrar incomprensibles mensajes de error, AMSTRAD SEMANAL te ofrece 
cada mes los programas publicados de los cuatro números correspondientes en una cinta 
de cassette, sólo por 675 ptas. (sin más gastos por envío). 


Para que lus dedos 
no realicen ellrabaja dura, M.H. AMS- 
TRAD la hace por li. Todos los lisiados que incluyan 
esle logo/ipo se encuenlran a lu disposición en un cas- 
selle mensual, solieí/anoslo. 


Envíanos con la menor demora posible, el cupón correspondiente. 
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JUGGERNAUT 


Conducir un trailer de 18 
toneladas a través de las 
calles de una gran ciudad, no 
es tarea fácil para conductores 
inexpertos. 


COMPATIBLE: 
CPC 464 
CPC 664 


n este caso formamos par- 
te de una gran compañía de trans- 
portes, como tal debemos recoger 
mercancías en distintos puntos de la 
ciudad y lIevarlos a su destino, con- 
duciendo nuestro supercamión. 
Una vez pasada la moda de los 
controladores aéreos, las casas de 
software en su empeño por descubrir 
nuevos horizontes, hacen controla- 
dores de todo aquello que se puede 
conducir; coches de carreras, sub- 
marinos, helicópteros, máquinas de 
tren, motos, etc. Pero hasta ahora 
nadie lo había hecho con un camión 
de transporte. 
En este caso, la acción de condu- 
cir un trailer pesado con las compli- 
caciones que acarrea, controlando 
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velocidad y giros, es totalmente nue- 
vo, el gran peso que arrastramos 
tras nosotros no permite frenadas ni 
giros bruscos. 
La simulación está reproducida 
hasta tal punto, que controlamos vo- 
lante, acelerador, freno y cambio de 
marchas. 
Dentro de las distintas opciones 
que podemos seleccionar hay varias 
misiones claramente diferenciadas 
Elegimos el tipo de camión y s
 
longitud y el tonelaje máximo que 
puede transportar. 
Podemos conducir o situarnos en 
el curso de prácticas. 
Para los expertos existen opciones 
de alta puntuación, con dificultades 
extremas. 
Por supuesto, también podemos 
definir las teclas a nuestro gusto con 
la comodidad que ello implica a la 
hora de manejar nuestro trailer. 
Todo esto mediante un menú de 
opciones de tipo gráfico, con el uso 
de iconos. 
Una vez definido todo esto, pasa- 
mos a la fase de acción. Tenemos 
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cuatro modalidades: carretero, cir- 
culación por cruces, aparcamiento y 
manzanos. 
En el juego nos constituimos en Lu- 
cas T raper, conductor poro uno pe- 
queño firmo de transportes, nuestro 
trabajo es sencillo, no requiere lo uti- 
lización de lo cabezo, solamente he- 
mos de recoger varios mercancías en 
distintos puntos de lo ciudad, 
Carbón, aceite, modero, frutos y 
verduras constituyen nuestro cargo. 
Disponemos además de un mapa 
urbano, en el cual está indicado lo 
posición de nuestro base de opera- 
ciones y lo \cama de c911es de lo ciu- 
dad. 
 
Con todo esto cabrío pensar que 
lo coso es bastante fácil, pero el pro- 
blema radico en que debemos loca- 
lizar o los distintos abastecedores, 
¿Cómo hacerlo? 
Usando el teléfono es lo formo más 
sencillo y cómodo. 
Poro ello, tenemos que localizar 
uno cabina y desde ello telefonear o 
nuestro oficina central. 
El combustible también debe tener- 
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M r. Joystick 


se en cuento, un trailer de estos ca- 
racterísticos consume grandes canti- 
dades y debemos parar o repostar 
en los estaciones de servicio distribui- 
dos 01 efecto. Los labores de cargo, 
descargo, llenar el depósito de fue!, 
etc" también son controlados por 
iconos, facilitando gráficamente el 
desarrollo rápido de lo acción y lo 
comprensión de ésto. 
Nuestro recorrido por las calles de 
lo ciudad está jalonado de dificulta- 
des, glorietas, cruces de calles, carre- 
teros estrechos, etc., pero además 
hemos de respetar el límite de velo- 
cidad de 30 MPH, en coso contrario 
lo policía pondrá fin o nuestro reco- 
rrido. 
Francamente un juego original, 
que manejo conceptos hasta ahora 
desconocidos, amenizado por lo uti- 
lización de uno bueno dosis de estra- 
tegia, sin lo cual servir o lo pequeño 
empresa de transportes no es posi- 
ble. 
En todo momento hemos de tomar 
decisiones; el tipo de camión elegi- 
do 01 principio del juego es de gran 
importancia, grandes camiones son 
más difíciles de manejar pero trans- 
portan más mercancía. 
Elegir lo ruta adecuado, gastando 
lo cantidad justo de combustible y 
procurando que el deterioro de 
nuestro trailer seo mínimo es lo mi- 
sión o cumplir. 


,J,y HORRIBLE 
..t. J 0 UN ROLLO 

 ""I
 ",t. PASABLE 
J
 J
 
 

 BUENO 

4.f


 MUY BUENO 



 '; , 


:"! OBRA 

 MAESTRA 
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BOULDER 
DASH 


Nuestro l equeño amigo 
Rockfor , es un hombre 
topo con una 
desmesurada inclinación 
hacia los obietos 
brillantes. 


n esta ocasión, nuestro hé- 
roe se encuentra en las profundida- 
des terrestres, vagando a través de 
misteriosas cavernas, en las cuales 
recoge los objetos a los que profesa 
devoción; todos los cuerpos brillan- 
tes y relucientes: diamantes. 
Pero extraer estas valiosas piedras 
de las profundidades no es tan fácil, 
la tierra se resiste a que le quiten sus 
frutos, el camino que atravesamos 
está repleto de grandes rocas, dis- 
puestas a aplastarnos en cualquier 
momento, caminar debajo de ellas es 
muy arriesgado y ha de realizarse a 
toda velocidad, aprovechando elli- 
gero temblor que se produce antes 
del desprendimiento. 
Por si todo esto fuera poco, extra- 
ñas formas de energía subterránea 
también nos acosan, las profundida- 
des subterráneas guardan terribles 
sorpresas para Rockford. 
Lodos verdes que taponan las sa- 
lidas y que se reproducen velozmen- 
te, paredes de sólida roca, maripo- 
sas voraces, etc., nos aguardan en 
los abismos subterráneos. 
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El programa contiene 16 cavernas 
diferentes de cada una de las cuales 
debemos encontrar la salida y reco- 
ger el máximo número de diamantes. 
El tiempo es un factor determinado 
a la hora de sumar bonus. 
Las cavernas son por orden de 
aparición: 
I ntro, rooms, maze, butterflies, 
guards, firely dens, amoeva, en- 
chanted wall, greed, tracks, crowd, 
walls, apocalypse, zigwag, funnel, 
enchanted box. 
Cada una de las cuales posee sus 
propios moradores y peligros adicio- 
nales. 
Los elementos con que nos encon- 
tramos en el juego: 
Rockford, el hombre topo que po- 
see el poder de escavar la tierra. 
Rocas atrapadas por la tierra que 
caen cuando pasamos por debajo. 
Diamantes, las piedras que atraen 
la atención de Rockford, sin ellas no 
podemos descubrir la salida de la ca- 
verna. 
Núcleos de energía, atrapadas en 
las mismas cavidades que los dia- 
mantes, se introducen en los corre- 
dores y son mortíferos al contacto 
con nuestro hombre. 


M r. Joystick 
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Mariposas, también altamente 
mortíferas, se convierten en diaman- 
tes al explotar. 
Amebas, son manchas verdes que 
se extienden sin limitación por la ca- 
verna, a su contacto con los núcleos 
de energía y las mariposas se con- 
vierten en diamantes, Rockford pue- 
de controlar su crecimiento. 
Muros mágicos, impenetrables pa- 
ra nuestro héroe, pero con la propie- 
dad de que las piedras que caen so- 
bre ellos se convierten en diamantes, 
Muros de titanio, completamente 
indestructibles. 
Zona de escape, se activa cuando 
el hombre topo ha recolectado el nú- 
mero preciso de diamantes, constitu- 
ye el paso obligado hacia la próxi- 
ma caverna. 
Un típico juego sin complicaciones, 
con gráficos sencillos perteneciente a 
la primera generación de juegos pa- 
ra ordenador. 
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M.H. AMSTRAD te da a elegir entre tres de los mejores juegos existentes en el mercado 
para AMSTRAD¡ COMBAT LYNX, DALEY THOMPSON'S DECATHLON y BEACH HEAD, cualquiera 
de los cuales puede ser tuyo solamente con suscribirte a nuestra revista. Aprovecha esta 
. ocasión excepcional y ahorra 2.700 pesetas (precio de venta del programa) 
más el importante descuento que se produce en el 
precio de cada número, por el hecho de ser 
suscriptor. Disfruta de las ventajas que supone 
recibir cómodamente tu revista a domicilio y de la 
seguridad de tener tu ejemplar aunque se haya 
agotado en los quioscos. 


E, t b I t ', d . '. 
nVlanos u o e In e suscrrpclon y no 
le des más vueltas, el número de juegos para 
regalos de suscripción, aunque grande, es li- 
mitado, y estos se podrían agotar mientras lo 
estás pensando. 


BEACH HEAD producido por U.S, GOLD es una mi- 

ión de desembarco en una costa fuertemente defendida 
por las fuerzas aeronavales enemigas, Debes conducir tu 
flota hocia la bahía y repeler el ataque aéreo, si lo consi- 
gues tu siguiente obstáculo será una flotilla de destructo- 
res y acorazados, superada la cual desembarcarás tus an- 
fibios en las orenos de la bahía, estos deben superar las 
defensas costeras y llegar a la fortaleza que es el objetivo 
final. 
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COMBAT L YNX simulo una misián de defensa de unos 
bases atacadas por uno división acorazada. Disponemos 
para enfrentamos a ellos de un modernísimo helicóptero. 
Este juego podría incluirse dentro del catálogo de los de 
estrategia, y su complejidad le dota de una gran dosis de 
odicción y belleza, 


DALEY THOMPSON'S DECATHLON con este jue- 
go OCEAN enciende lo llama olímpica y te reta a superar 
los récords de los campeonatos de todos los tiempos, el 
decathlon se desarrollo en dos días de competición y se 
compone de las siguientes pruebas: 
PRIMER DIA: 100 m lisos, salto de longitud, lonzamien- 
to de peso, salto de altura y 400 m lisos, 
SEGU N DO DIA: 110m vallas, lanzamiento de disco, sal- 
to con pértigo, lanzamiento de jabalina y los 1.500 m. 
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Utiliza el cupón 
adjunto a la revista 
o suscríbete por 
teléfono 
(91) 733 50 12 
(91) 733 50 16 
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Los BUCLES 


Ni un solo programo funciono sin incorporar en su 
interior toreos repetitivas, bucles. Uno de los 
mejores formas de hacerla es usar los bucles 
estructc;rados, como el WHILE... WEND. 
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en medio de un programa, detiene su ejecu- 
ción, imprime un signo «?» y espera hasta que 
le demos una réspuesta. 
En este caso, teclearíamos una serie de ca- 
racteres y, tras pulsar ENTER, la cadena se- 
ría asignada a la variable nombre$, lista pa- 
ra proceso. 
Resulta conveniente, al hacer una pregun- 
ta a la persona que se sienta frente al orde- 
nador, imprimir un texto aclarativo de lo que 
estamos preguntando, así: 
30 PRINT «Cuántos años tienes»; 
40 INPUT edad 
Aún mejor, más económico desde el punto 
de vista de la memoria empleada, sería incluir 
dicho mensaje en la propia sentencia INPUT. 
Esto se hace de la siguiente manera: 
10 INPUT «Cuántos años tienes»; edad 
sencillo, ¿verdad? 
Obsérvese, sin embargo, tres puntos impor- 
tantes: 
1. El mensaje se inserta entre el comando 
INPUT y la variable, 
2, El mensaje va entre comillas, es decir, 
es un literal o cadena de caracteres, 
3, Hay un punto y coma entre las comillas 
que dan fin al mensaje y la variable. 
Todo esto, en forma de listado, está en el 
programa 1, 
Análogamente, el programa «multiplica- 
dar» de la semana pasada, se convierte en 
el programa 2, 
Y, por supuesto, este método también tra- 
baja con variables de cadena (programa 
3). 
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Antes de deiar de lado el comando, convie- 
ne comentar que puede utilizarse más de una 
variable en la misma sentencia, como mues- 
tra el programa 4, 
El ordenador esperará hasta que le intro- 
duzcamos dos números. 
Si tecleamos el primero y pulsamos ENTER, 
nos veremos sorprendidos por un mensaje de 
error: «?Redo From Star/J>, porque no le he- 
mos dado al micro un número suficiente de da- 
tos para llenar las dos variables que «(guardan 
cala». 
Debemos dar dos valores separados por una 
coma, del mismo modo que las variables se 
encuentran separadas en la línea 30 del pro- 
grama 4. 
Una vez hecho, se ve que el primer dato se 
almacena en la variable (primero» y el segun- 
do en la variable (segundo», 
Ni que decir tiene que otro tanto ocurre con 
las variables de cadena. 
Colocar varias variables en una sentencia 
INPUT es cuestión de gustos: se ahorra me- 
moria, pero el programa resulta menos cla- 
ro, 
Por último, el uso de las comas como sepa- 
radares, explica por qué, en respuesta a una 
sentencia del tipo: 
10 INPUT number 
no podemos responder 1,000 sino 1000, Tra- 
tar usando la coma y veréis que divertido, 


"hile... Wend 


Vamos a introducirnos ahora en algo com- 
pletamente distinto, Sin duda se recordarán 
programas del tipo del programa 5, es decir, 
bucles sin fin o bucles incondicionales. 
Hay por lo menos otra manera de obtener 
bucles incondicionales, la del programa 6. 
Al ejecutorio, la palabra «hola» será impresa 
repetidamente hasta que se pulse la tecla ESe. 
los comandos WHllE (en español mientras) 
y WEND (abreviatura de While END, «fin 
del mientras))), marcan el comienzo y el 


. . . . . . . 
. . . . . . . 
. . . . . . . 
. . . . . . . 
. . . . . . . 
. . . . . . . 
. . . . . . . 
. . . 
. . 


. 


411 
. 
. 
. . 
. . . 
. . 
. . . 
. . 
. . . 
. . 
. . . 
\. . 
. . . 
. . 
. . . 
. . 
. . . 
. . 
. . . 
. . 
. . . 
. . 
. . . 
. . 
. . . 
. . 
. . . 
. . 
. . . 
. . 
. . . 
. . . 
. . . 
. . . . 
. . . . . 
..... 
...... 
..... 


\ 


. . . 
. . I 
. . 
.1 
. . 


final de un sector de programa que debe ser 
repetido, 
A este sector le llamaremos el Cyerpo del 
bucle. ' 
Naturalmente, no podemos poner en una 
sentencia un WHllE sin más, El Amstrad, 
ni corto ni perezoso, 
regunta «mientras 
qué»)? a su propia manera: enviando un men- 
saje de error y deteniendo la ejecución del pro- 
grama, 
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Hay que colocar una expresión detrás del 
comando WHILE, que el Amstrad evalua- 
rá para saber si es cierta o falsa, esto es, si 
es 1 ó O..ta sección de programa marcada con 
WHILE.., WEND se ejecutará mientras la ex- 
presión sea cierta. Cuando sea falsa, el flujo 
del programa pasa a la sentencia inmediata- 
mente siguiente a WEND, 
La línea 30 del programa 6 dice: 
30 WHILE 1 = 1 
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Literalmente le estamos diciendo al Ams- 
trad: «hazlo mientras uno sea igual a uno». 


¿L
g ¡ea mente? 
Resulta obvio que «uno igual a uno» es una 
verdad como un templo, y así lo interpreta el 
ordenador, No en vono hablábamos de bu- 
cles sin fin¡ éste se seguiría ejecutando hasta 
el próximo corte de luz, 


El programa 7 es virtualmente idéntico al6, . 
excepto por lo líneo 30, que ahora dice: 
30 WHILE -1 
Al correrlo se obtendrá exoctamente el mis- 
mo resultado, sorprendentemente. 
Algo menos de sorpresa experimentaremos 
si tecleamos: 


PRINT 1 = 1 
Aparecerá -l. 
La razón es que a las computadoras les en- 
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cantan los números, y el Amstrad asigna al 
concepto verdad o cierto el valor -1. Por tan- 
to, en ambos programas la línea 30 significa 
«mientras verdad». 
Sí, ya sé que eso no nos dice que es verdad 
o cierto, pero paro el ordenador todo es cier- 
to mientras no se demuestre lo contrario, yen 
el cuerpo del bucle se repite indefinidamente. 
Por otro lodo, 01 teclear: 
PRINT 1=2 
se verá un rotundo O en la pantalla, 
Al cambiar la línea 30 por: 
30 WHILE O 
queremos repetir un trozo de programo Ba- 
sic mientras (lo que seo), seo falso. Por supues- 
to, el bucle no se ejecuto ni una vez. 
En respuesta 01 ingenioso razonamiento de 
que es cierto que O es falso, y que, por tonto, 
el micra debiera ejecutar el bucle hasta el fin 
de los tiempos, debo decir que tan alambica- 
das sutilezas el ordenador no es capaz de 
«captarlas» de una solo vez. Lo máquina 
no se paro en borras: encuentra un cero, de- 
duce que lo que sea es falso, no lo hace y bos- 
ta, 
Habría que añadir una determinado instruc- 
ción poro que se percatara, por ahora fuero 
de nuestro estudio. 
A mí, personalmente, los números no me 
gustan demasiado, Probablemente seo más le- 
gible emplear palabras más significativos, ha- 
ciendo uso de variables, como el programo 8. 
Como condición de un bucle WHILE puede ir 
cualquier expresión evaluable, por complica- 
do que sea, como por ejemplo ésta: 
WHILE hoya-página 
READ página-siguiente 
WEND 
Esto rutina «leería» un libro hasta que no hu- 
biera más páginas, admitiendo que READ 
página-siguiente fuera uno subrutina que rea- 
lizara los funciones necesarios, pero lo lógico 
sería ésa, 


Bucles condicionales j 
El programo número 9 usa un bucle WHI- 
LE... WEND que evalúo uno condición muy 
simple: los líneas 40 y SO del programo serán 
repetidos hasta que lo variable fin$ seo igual 
a «si», o, lo que es lo mismo, hablando en 
términos del propio bucle, mientras la varia- 
ble fin$ sea distinta de «si», se repite el pro- 
ceso. 
Aunque esto variable sea mentada por pri- 
mero vez en lo línea 30, el Amstrad, la ha- 
ce igual a cadena vacía, esto es, o nodo, auto- 
máticamente, Por eso no necesitamos definir- 
lo previamente, y, además, sobemos que en 
lo primera iteración del bucle lo condición es- 
pecificado no se cumplirá; 01 menos se ejecu- 
tará uno vez. 
Exactamene lo mismo habría ocurrido con 
uno variable numérica. Atención ahora al pro- 
grama 10. En el, inicial izamos la variable nú- 
mero a O (línea 30) e imprimimos su valor (lí- 
nea 40). 
24 MICIIOHOBBY AMSTRAD 


-RO 


RA 


, 


PRIMEROS PASOS, NUMERO ;' 


18 REM Programa 1 
28 t'IODE I 
30 INPUT Cuónto
 &Q05 tl
n

w:edad 
49 PRINT No creo que t.ngas . ;
dad 


lB REM Pro9r

 2 
29 MODE I 
30 INPUT Prlm
r num.ro.iprlmero 
49 INPUT .Segundo num
ro.ise9undo 
50 PRINT primero mu1tlp1 Icado por 
. segundo . d
 prlm
ro
.@gundo 


I
 REM Progr¡m. 3 
29 MODE 1 
30 INPUT "Cual 1!'5 tu nombr."jnombre 

 
40 PRINT
Encantadc de 
onoc
rte. u. 
nombre$ 


lB P.EH Progr
ma 4 
29 MODE I 
30 INPUT Dlme 2 num.ros
;prlmero.s 
t'Qundo 
49 PRINT prlmE'I"O - mul t.pllcado por' 
'se9undo da prlm.ro
segundo 


19 REM Programa S 
29 MODE 1 
30 PRINT-hola' 
49 GOTO 30 


1(1 REf"1 Prtogr<tlfli. o 
29 "DDE I 
30 !JJHILE Iml 
41$ PRINT hola'" 
50 WENO 


J0 REM Proor
ma 7 
20 
IDDE l 
39 t,JH l LE -1 
4Ci PRINT-hol
- 
50 WEND 


19 REH Programa 8 
29 
IODE I 
313 'Jerd
d -1 
40 WIiILE v,,"rdad 
50 PRHIT-hc¡).' 
09 
IEND 


J0 REM ProQrama 9 
20 MODE I 
30 WHILE Iln${> l.'" 
40 PRINT E
to 

 un buc1. WHILE...W 
END condlclon.1 
59 INPUT -QulerE'
 acabar-'" ¡fln'$ 
60 WEND 
76 PRINT y
 me voy. 


10 REM Programa 10 
20 MODE l 
3B num
ro-0 
40 PRINT'Numero es '";numero 
se nuevonumero numero+1 
69 PRINT"EI nuevo num
ro .1. '¡nuevo 
numero 


10 REt1 Pl"oarama 11 
20 MODE 1 - 
30 num.ro 0 
40 PRIHT"Numt'r-o es ;nurJlero 
SE! numE'. o=-numero+ 1 
60 PRINT'"E1 nut'vo numero es 
hora " 
;numero 


10 REt" Progr-i.ma 12 
20 I'IO(IE I 
31.\ numero-e 
40 
IHILE -) 
50 r<ume-ro::,.numero+1 
60 PRINT'"EI numero 
s ahora ";num
r 
o 
79 WEND 


A 



 
Entonces le sumamos 1 y atesoramos el re- 
sultado en la nueva variable «nuevonúmero», 
imprimiéndolo (líneas 50-60). 
Con la línea SO del 1 O en lo mente, exami- 
nemos el número 11. El trabajo que realizo es 
prácticamente el mismo que el programo an- 
terior, y su lógica está basada en él. Hemos 
hecho, sin embargo, un cambio importante, 
también en la línea SO. 
Vamos o analizado un poco, paro tratar de 
comprender, entre otros cosas, lo que signifi- 
ca uno igualdad poro un ordenador: 
SO número = número + 1 
Desde un punto de vista estrictamente ma- 
temático, esta sentencio no tiene sentido. No 
se puede decir que algo es igual a sí mismo 
más uno, como si dijéramos, por ejemplo, S = 
=S+1. 
Sin embargo, aquí se esconden dos impor- 
tantes claves: 
1. El micro evalúa en primer lugar 
la parte derecha de la expresión, es- 
to es, «número + 1 », Lo primero vez que lo má- 
quina llega a lo línea SO, miro el volar de nú- 
mero, que es cero, y le suma 1. Tenemos pues, 
que la porte derecho vale uno. 
2. Para el Amstrad, el signo «=», 
significa asignación en lugar de 
igualdad, normalmente. Tomo, por tan- 
to, el volar de lo parte derecha, 1, y lo asig- 
no o lo variable número. Como el valor ante- 
rior de número era cero, ahora será 1. Si aquí 
hubiera un bucle, se repetiría el cálculo, la se- 
gunda posado asignaría o número el valor 2, 
resultado de tomar el valor actual (1) y sumar- 
le 1. 
En definitivo, la línea SO aumento el volar 
de lo variable número en una unidad. 
El ordenador no tiene ningún problema en 
tomar el valor de una etiqueto (variable), usar- 
lo paro un cálculo y cambiar el volar de esa 
misma etiqueto. Por eso a las variables 
se las llama, precisamente, varia- 
bles. 
El programa 12 incluye un bucle WH 1- 
LE..WEND que imprime repetidamente el vo- 
lar de número, uno y otra vez. 
Podrías alterado poro que los números que 
aparecen en pantalla fueran de 4 en 4, y tam- 
bién poro que empezara por el número 1000 
y fueran descendiendo de 1 en 1? 
Naturalmente, podemos controlar el tran- 
go de los números que se imprimen, alteran- 
do la línea 40, por ejemplo: 
40 WHILE número024 
Se verán los números del 1 al 24, 
Si ahora hacemos que lo línea SO seo lo 60, 
y lo 60 la SO, intercambiándolas, lo solido en 
el monitor es notablemente distinto, Podrías ex- 
plicar por qué? 
Uno última cosa: lo línea 30 de los progra- 
mas 10, 11 y 12 es superfluo; como yo sobe- 
mos, paro el ordenador todos los variables son 
cero mientras no se le indique lo contrario. Se 
ha puesto simplemente por claridad. 
Próximamente seguiremos analizando los 
características de los bucles. 
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Todos los programadores y aNdonados a la 
microinformática sabemos lo tedioso y propenso a errores 
que resulta el teclear un listado de un programa. Para 
facilitar tu labor al máximo y que no tengas que estar 
horas sobre el teclado de tu ordenador tratando de 
descifrar incomprensibles mensajes de error, 
AMSTRAD SEMANAL te ofrece cada mes los 
programas publicados de los cuatro números 
correspondientes en una cinta cassette, sólo por 675 
ptaS.(sin más gastos por envío). 
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Programas incluidos en la cinta número 1 


I Revista número 
1 
2 
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USO DE REGISTROS 
COMO PUNTEROS 
! 

! 
lt l 
Los registros del 180 pueden combinarse para formar : \: 
registros dobles, BC, DE, HL, capaces de manipular números 
 , . 
,de 16 bytes. i 
I 
i 
! 


odemos cargarlos con valo- 
res constantes: 
LD BC, &2FF8 
que, en opcodes, se traduce en: 
01 FR2F 
de la forma acostumbrada, es decir, 
byte bajo, byte alto. 
También son muy comunes las in- 
trucciones del tipo: 
LD BC, (&2FF8) 
en donde &2FF8 no indica aquí una 
constante, sino un puntero que seña- 
la a una determinada posición de 
memoria. Después de ejecutar esta 
instrucción, cuyos opcodes son: 
ED 4B F8 2F 
el registro C contendrá el número al- 
macenado en &2FF8 y B el que ha- 
ya en &2FF9. Como se puede ver, 
esto es una suerte de peek de dos 
bytes a un tiempo. Resultará extre- 
madamente útil. 
La facultad de los registros dobles 
de manipular un número entre &0 y 
&FFFF, nos viene que ni pintada pa- 
ra apuntar a, o, más técnicamente, 
índexar, cualquier posición de me- 
mona. 
Por ejemplo, si hemos cargado HL 
con &2FF8 (LD HL, &2FF8), la ins- 
trucción: 


LO A, (HL) 


I Cl 
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cargará el acumulador con el conte- 
nido de dicha posición de memoria, 
es decir, un peek de un byte extraí- 
do de donde apunta HL. 
Lógicamente, la operación inver- 
sa: 


LD (HL), A 
existe, e incluso funciona. 


DIRECCION OPCODE 44NE ,', , d ,', 
3000 21 F8 2F LO HL, &2FF8 
3003 3E FF LO A, &FF 
3005 77 LO (HL), A 
3006 (9 RET 
Programo 7 


El programa número 1 muestra el 
mecanismo de todo esto. 
Tras ejecutorio, Hexer debería 
mostrar que &2FF8 contiene &FF. 
Línea por línea, ocurre lo siguien- 
te: 
- Línea 1: HL apunta (índexa) a 
&2FF8. 
- Línea 2: el A contiene &FF. 
- Línea 3: el contenido de la di- 
rección apuntada por H L pasa a al- 
macenar &FF. 
- Línea 4: retorno al Hexer. 


Indexación de 
memoria 


Alguien, con toda la razón, se pue- 
de sorprender de por qué no se ha 
escogido la técnica que muestra el 
programa 2 para cumplir nuestro 
propósito. 


1)IRECCION 
3000 
3002 
3005 
Programo 2 


, 

']I 
3E FF 
32 F8 2F 
(9 


I'j 
 1'1' (I
 O 


LO A, &FF 
LO (&2FF8),A 
RET 


El motivo es que, con el método del 
programa 1, podemos beneficiarnos 
de las instrucciones: 
INC HL 
DEC HL 
para movernos arriba y abajo de la 
posición inicial apuntada por H L, y 
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I 1: f'.
 . , .];,¡,.... 11 ¡¡, ,11,' d ,'i 
3000 21 F8 2F LD HL, &2FF8 
3003 3EFF LD A, &FF 
3005 77 LD (HL(A 
3006 23 INC H 
3007 77 LD ¿HL(A 
3008 23 IN H 
3009 77 LD (HL),A 
300A C9 RET 
Programa 3 


alterar sus contenidos si así lo que- 
remos, es decir, podemos indexar 
una determinada zona de la memo- 
ria y acceder a ella muy fácilmente, 
como se ve en el programa 3. 
Acabamos de llenar tres posiciones 
consecutivas de memoria, de &2FF8 
a &2FFA inclusive, con &FF. 
Para averiguar hasta donde he- 
mos comprendido este sencillo meca- 
nismo, no estaría de más intentar es- 
cribir un programa gemelo del 3 que 
llenara 3 posiciones de memoria, 
partiendo de &2FFA, pero hacia 
atrás, hasta alcanzar &2FF8. 
Otro ejercicio interesante: poner 
los valores O, 1 y 2 en posiciones con- 
secutivas partiendo de &2FF8 (acor- 
daras de la instrucción INC A opco- 
de &3C). 


LO 8,n 06 n 
LD C,n OE n 
LD D,n 16 n , 
LD E,n 1 En 
LD H,n 26 n 
LD L,n 2E n 
LD (HL),n 36 n 
LD A,n 3E n 


Tabla 7: LO r, n opcodes 


Resulta que, para el Z80, (HL) se 
convierte en una especie de «regis- 
tro extra» de un byte, es decir, a 
menudo las instrucciones como IN- 
Crementar y DECrementar y otras, 
pueden aplicarse al contenido de la 
dirección de memoria a donde HL 
apunta, como en: 


INC (HL) 
DEC (HL) 
ADD A,(HL) (Opcode &86) 
SUB (HL) (Opcode &96) 


Los códigos de operación de ellas 
llenan los huecos en las tablas que vi- 
mos anteriormente, por ejemplo la l. 


Los opcodes están 
relacionados 


Recordaréis que los opcodes se- 
guían una cierta regla, aumentaban 


ódigp 
máquina 


de 8 en 8 (insistimos en que se exa- 
minen en binario), salvo que de &2E 
se pasaba bruscamente a &3E. Fal- 
ta, claro, el &36, opcode correspon- 
diente a: 
LO (HL),n 
Análogamente sucede con la T 0- 
bla 2, que ahora ya está completa, 
salvo por el asterisco colocado en la 
que sería la instrucción: 
LO (HL), (HL) 
que no tiene ningún sentido. 
\ 


Modos de 
direccionando 


Entre la jerga de uso común en or- 
denadores, que casi nadie compren- 
de, y casi nadie quiere comprender, 
programadores incluidos, estos ma- 
laborismos con contenidos de memo- 
ria apuntados por un registro se di- 
ce que es un modo de direcciona- 
miento, nada menos, y le llaman in- 
directo, lo crean o no, porque no te- 
nemos que decirle al micro directa- 
mente qué posición de memoria lla- 
ma nuestra atención. Dejamos al Z80 
que lo encuentre, que para eso le pa- 
gan. 


'IRECCION 
3000 
3003 
3005 
Programa 4 


. :,¡
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21 F8 2F 
36 FF 
C9 


LD HL, &2FF8 
LD (HL), &FF 
RET 


'IRECCIO OPCODE 
3000 21 F8 2F 
3003 36 FF 
3005 23 
3006 C9 
Programa 5 


" NEMONICOS 
LD HL, &2FF8 
LD (HLL &FF 
INC Hl 
RET 


DIRECCIO . 
3000 
3003 
3005 
3006 
Programa 6 


MNEMONICOS 
LD HL, &2FF8 
LD (HU, &FF 
INC (HL) 
RET 


OPCODE 
21 F82F 
36 FF 
34 
C9 
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El programa 4 usa direccionamien- 
to indirecto para cargar &2FF8 con 
&FF. Obsérvese la analogía y la di- 
ferencia con el programa número 1. 
Atención a los programas 5 y 6, 
porque existe entre ellos una diferen- 
cia fundamental que se descubrirá 
por sí sola al ejecutorias en el Hexer 
y examinar los resultados. No insis- 
timos más en ello porque la diferen- 
cia entre posiciones de memoria y 
contenidos de memoria se discutió 
ampliamente en el artículo inmedia- 
tamente anterior a éste. 


, 
r 


8 C D E H l HU A 
8 40 41 42 43 44 45 46 47 
e 48 49 4A 48 4C 4D 4E 4F 
D 50 51 52 53 54 55 56 57 
E 58 59 5A 58 5C 5D 5E 5F 
H 60 61 62 63 64 65 66 67 
l 68 69 6A 68 6C 6D 6E 6F 
(Hl) 70 71 72 73 74 75 * 77 
A 78 79 7A 78 7C lO 7E 7F 


Tabla 2: opcodes para LD r,r' 
Una vez examinados ambos pro- 
gramas, sin duda podréis predecir 
los resultados del programa 7. He- 
xer resultará de ayuda. 


1] : f( ,l": - P ,- I 'NEM- 
 
3000 21 F8 2F LD Hl, &2FF8 
3003 34 INC 
L) 
3004 23 INC l 
3005 34 INC 
L) 
3006 23 INC L 
3007 34 INC (HL) 
3008 C9 RET 
Pragrama 7 


El registro HL es el favorito de los 
dobles del Z80. No se pueden reali- 
zar las tareas vistas anteriormente 
con BC y DE; hay que usar el acumu- 
lador como intermediario, como 
muestra la Tabla 3. Como ejemplo 
del uso de estas instrucciones, mirad 
el programa 8. No hay que asustar- 
se; en realidad, hace algo muy sim- 
ple: copia los tres primeros bytes del 
propio programa 8 en el espacio de 
trabajo del Hexer, para lo cual se uti- 
lizan DE y HL como punteros. 
HL apunta al «origen!) de los da- 
tos, &3000, y DE al «destino)). El 
acumulador se carga con el byte 
apuntado por HL, mediante: 
LD A,(HL) 
y el valor es enviado a la posición in- 
dexada por DE: 
LO (DE) ,A 
Ambos registros son INCrementa- 
dos en uno para apuntar a los si- 
guientes origen y destino. 
El proceso se repite hasta que los 
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3000 
3003 
3006 
3007 
3008 
3009 
300A 
3008 
300C 
300D 
300E 
300F 
3010 
Programa 8 


lD 
 8C ,A 
LO DE,A 
lD , 8C 
lD A, DE 
Tabla 3: direccionamiento indirecto con 
BC, DE 
tres bytes han sido copiados. Estos 
ejemplos, aunque sencillos, están 
muy lejos de ser triviales, porque las 
técnicas descritas aquí tendrán que 
ser utilizadas sin descanso en cuan- 
to se pretenda desarrollar un pro- 
grama en lenguaje máquina. 
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Nos encontramos con 
un programo clásico, 
responsable en gran 
medido de lo existencia 
en el hogar de los 
ordenadores: un 
comecocos, uno de los 
primeros tipos de 
videojuegos. 


I 


e trata, como es sabido, de 
un abenn o colorista y compulsivo 
en el que tenemos que comer la má- 
xima cantidad posible de eebotonci- 
toS», mientras somos implacable- 
mente perseguidos por el ominoso 
ejército de Grumpis, ávidos de san- 
gre, de nuestra sangre concretamen- 
te. 
y como esto es el cuento de nunca 
acabar, cuando hemos completado 
un laberinto, orgullosos de nuestra 
habilidad, resulta que hay que co- 
menzar otro; la sádica diferencia es- 
triba en que los hambrientos Grum- 
pis se mueven mucho más deprisa. 
Son como los bancos, están cada vez 
más cerca. 
El programa, faltaría más, está lo 
más estructurado posible: los GOTO 
son tabú y no se ponen en la medi- 
da de lo posible. 
El cuerpo principal (líneas 40-270) 
maneja una serie de subrutinas que 
imprimen las instrucciones, dibujan el 
laberinto y mueven los caracteres 
(nos referimos a los gráficos). 
Cada subrutina está adecuada- 
mente provista de una sentencia REM 
para poder identificarla con toda fa- 
cilidad. 


L 


,.. 


S erie Oro 


SUBRUTINAS 


Interrupción 1 


Interrupción 2 


Inicializoción 


Dibuja laberinto 


Posición inicial 
Asignación 


Mueve hombre 


Mueve Grumpis 
Fantasma 


Cogido 
Instrucciones 
Siguiente pantalla 


Fin 


Usamos el eetemporizodof») 1 para generar una 
interrupción y ajustar el reloj. 
El temporizador O es el contador de bonos. Alcanza el 
cero en 100 segundos. Los bonos se imprimen en la 
ventana número 1, por lo que no estorban a los otros 
caracteres. 
Dimensiana las matrices, asigna colores y establece la 
máxima puntuación. K% es la tecla ¿Y. 
Lee las datas y añade 82 al código ASCII de cada 
carácter de las mismas antes de imprimirlas. 
... de los Grumpis y de nuestro héroe, Smaley. 
Puntuación y bucles de retarda a valores iniciales. Imprime 
puntuación y tres gráficos. 
Si es que hay que moverla, si no, retorna. Encuentra las 
nuevas coordenadas de movimiento y pone a 1 el flag ok 
si es la misma que una de los Grumpis. Barra la figura 
anterior y pinta la nueva. También, si hemos comido algo, 
incremento la puntuación. 
Pues esa, los mueve. 
Esta rutina fantasma mira dónde se encuentra Smaley y 
mueve los Grumpis hacia él si no hay una pared en el 
camino. Analiza si Smaley ha sido capturada y repone la 
comida cuando es necesaria. 
Hace alga de ruido y decrementa las vidas. 
Obviamente... 
Imprime la pantalla en modo transparente. Suma las 
bonos adquiridas a las puntos e incremento la pantalla. 
Limpia la pantalla, imprime la puntuación y pregunta si 
deseamos jugar de nuevo. 
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100 E0ERY 
O:G
SUB 810 
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470 PRINT 
480 NEXT CHR$(V'
": 
490 NEXT 
500 RE 
510 : TURN 
:,20 DATA . 

30 DATA DH

HHHHHJDH 

,,,(I [>ATA 
), >})} )cn HHHHHHH,1 
550 DAT- L1DHHHHJ>C¿'?»»})C 
5.:,1} [, . T H C>C===='-' ...)DHHHrI 1)'-' 

_ H Á C}A - 'HIJ''--- ',-' 

(0 DATA r HHHHG»"---==C)C 
580 DAT _»)
»»D"AHHHHG
C 
590 DAT: 
}DJ DHJ>C
?»»>}>C 
':,00 ['ATA _>CC>AHG>C >DHJ >DJ>C 
610 DAT A 
'AG»»' A OAHG>CC)f"
 

_ 1»>' r;'>,' - 

¿0 DHTA - >OHJ>,;;' ,)AG>C 
030 DAT' AHHH>C='-'D DHJ»»C 

 4 . A >, > > ' _,.J > C= C' 

 11 DAT..... 'C=c.'CC" ,HHHG 
650 DAT A DHHH>C=C>A'" C=c>>>n 
,'
 r. > ",>C-C > 
wOu DATA: >AHG,>" - HHHJ 
670 ['A T ' L'DJ>>>>, [ ."AHG>>>>C 
,.. I-\I--)( C ,j,J>") 
,:-dO DAT A - . }DHJ' C -" I >D,I>C 
'->A G ' L,DH J ' '- 
_ J/
HG>cr' ....C)( 
_,AHG:'AG>C 


pV AR'ABLES 
R'NC' P 
SIGNIFICADO A LES 
T emporizodor NOMBRE 
Bonos 
M . que tenemos 
alm que 01 
codificado moceno elloberinto 
Posiciones de lo G . 
Tiempo poro el s ru
plS mozes$130) 
Siguiente G 
o"mlento del ghosf%12, 1) 
Retardo en'umpl . . 
Grumpis el movimiento de los gtlme%(2) 
Variable ind' 
Moximo p ICe de bucles 
deloy'lo(2) 
Variable untuoclón 1%, ¡'lo 
Código l de uso general h,% 
Coórde' d k'lo 
Coar d nO d as de Smole y ok 
eno os te 
Grumpis mparoles de Smole monx%, many% 
Puntuación y o ° 
Número de 'd x Yo, y% 
Número d v, os s,core% 
Voriobl e pantalla Ilves 
INKEy(i s usados por sereen 
Tiempo que queda o/¡ 
se muevo poro que Smaley a o, b%, c%, d% 
Retardo poro S I 
mo ey 


f% 
bonus% 


mlime% 
mdeloy% 



"'
 DATA ,- > ' 
I('\J ('AT' =- ,>>>>>>A;.) 
710 DAT
 L)DHHHHJj>
)
»»»C 
7213 CiAr' C>C====C>['J' 

HHJ}C 
730 DAT
 C>AHHHHG}CC

--==C>C 
740 DATA C}»)}»,r_,HHHHHG:C 
750 AHHHHHHHH

>
»»
)C 
_ . .HHHHHHH 
,ol1 D;.;T' HHr; 
,,' H 0.1 - e 
,
.11 '">6 18 .1' 
 - 
770 .
, -. 
,,"'.4.10 q 1 - 
4'-. ..:!.:2 


7$0 OATA 1 -:;o ,"";> 
??O : . --. 19. 2
. 2.22 
801
 F'Et1 .-:+ 
. PQ
ICtClnec 
81(1 RESTOPE -,,__ - de comienzo 
 
:::20 mde- J c.', .,,_' .::(t1 

: .-mde 1 ,,',;
-1 . . 
",3(1rr- . .mtlm
"- 
841) 

n ..,:=2 :man',', _
 .-md
 I ay 
4 EI.¡ 14' L - - .-.: : c,V--1 
¡ , ul_ATE 2 .., ,- : t".=O 
.;::50 FOF . .
:PF'INT CHPtl'">
 
86')' I .-(1 TO - . 
:. 

d¡:.I
'" ..... 



t 
m
"',,'; .",
";¡=9de 1 ;,,' " . 
'::',
 ':' F:EAD "'.: -.9d
 la," , 1"; l. ¡ - 2*,' I ;
. 1 
,i:<;
 ghc'
, t>;':. . . /. 
8. '-' F'Er',¡ .. I '.. \J ¡ =1<' , 
p
'_ 11+I"' L 
 .,qh,-,o t " . 
+'L
'O' .. 'ICATE -- /.'" 1 
'" 

 T - ,'.. o." ,,; ,,
" ..... 
ylA CH 
rIJ [,¡ 


:!, ;e'=LEFT I 
:;
 =:':;:
.
:,
 
j, tmaz,;¡' 2' . 1"" ". 
_'
 PEN . _:,::'r
';+10: . 
"" I.LLul 'TE doto -1'-'- 
';''''1 : .H 15+ 1 i ,.,;;-.
:": 
1 : t'onus',
=IÍlr _._....:PPINT 
. . .:'¡ : F'P H. IT . .1 : PEI'.I jj 1 
'. e _ 111 ' E . . 10 ' Lor 

.ol1 F'E"TUF' I ' . .c'n'
=:"" _"'TE!!I . 

,:,IJ I . b,x,OJ o." 


97(1 REI1 
98t 1 C r .. + H4.: i - - - ' 
Lo:;: PEN ':Inc.'_ Ion 
untc.s.:":0; 15:LOCATE 


1.25:PRINT 'P 
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96 PEfl 1..: LOCATE 1 ¿" 25: F'P 1 IH C'HF:'f ( 
224):CHR$(224):CHR$'.224' ; 
1000 gd")av
,.(O)=20:gd,,1
../.'1 ,-..O:Cld 
,,1 a}';';(;
.>=80 
1 (110 mde l..:o..>':
-
I: =CC,f e:',=l1: t'Clrlu
;-:=e: s.e 
r'een=l : 1 i \J€'s=3 
162@ RETURN 
1038 
1@4@ REM '''. Mo""r hombre ...... 
1050 IF mt ime'
>t.< THE
J RETURN 
1060 mt ime-",-t:;"'mdel a.....'.:T.¡.
=rn
n.)\
<-(. I
,' 
KEY( d'
' >-1) + ( 11'.Jf(E'( e:,:" >-1 ) : .':.;=man',.. 
-': INKE'(b:
' )-1) + ': It'WEY( a:.) )-1) 
1 @7e 1 F x;;=0 THEN ,,;
-20 
1@80 IF ":.=21 THEII ,,:;=1 
11390 IF (x/.-ghost'o,'(1.lj., AtIC' Y;:=c]ho
 
t:';,0,1)) OR (x/;=gho
.t/;(I.(1' AtJ[' 1'- 
ghost
« 1 ,1») OR .: 'k::'.=gho
 t.
( 2 I
:S'" At.JP 
.%-Qhost%(2.1.» THEN oV=9 
11130 IF 
lIr"$(maz"'$">':)..:..I\)'}" TH 
EN RETURf.¡ 
1110 PEN 14:LOCATE mC'n'</:.m"r,:,:.:PPIII 
T" ':LOCATE x;:.';'.,PRII'H CHR!;(22....:m 
.arr).(-;=x;'::man>-<"":=v"/': IF "1IC
f.1 m.Etze1( 
'.
'I. 
x% . 1 ) =' " THEN RETURI< 
112B SOUr-JD 1 2
, 30 ,5,15: do f: 

'.=,jCi t 

.- 
1 :score....=
cClre...:+10:PEN t5:LOC.:o.TE 7. 
25,PRINT 
,cor'l',:";j :rnaze$( /. '=LEFT$'rna 
ze$"y
-:) 4)\".':-1. 1 + 1 '+t1rC'$I..mazei:,<)/
, .x.'. 
+ I .> 
1130 RETURl.j 
1140 
1150 
1160 
1170 
28 
1 180 NEXT 
1 198 RETURN 
120@ 
1210 REM ** f
ntasma ** 
1220 SOUN
 13e.370_i%+378.10,14:gtl 
me%(i
)=t%+gdl'I
Y%(I%) 


I 
I 


! 



 
.1. 
( 
1, 
t 


REM ** r'lo'Jer f
ntasmas +* 
FCiR I
;- 0 TO 2 
IF gtirnl'
,".I. i%"<t
. THE
,I GOSUB 12 


-J...... . 
. . . 

 
-
 . 
I 


o 


. 


. 


. 


o 


. 


. 


.. ... 


aY1lU. 
 
. . 


. . . 
2SA 
L 


. ,
1 )I"i
?I . 
.-:=. I . 


. 


. 


- ..., 


o 


. 


. 
5-fl- 


fO 


\ 


O"':'4.JI" 
 


9 
. I I 1., I 


14413 FOR xX=O TO 336 STEP 2 
1458 FOR y%=8 TO 16 STEP 2 
1460 IF TEST(
%,v%1 THEN PLOT ,%'12 
8,366+y%.2 4 3:PLOT 
%+12C4368+.e

2.3 
1478 NEXT 
1488 NEXT 
1490 LOCATE 1 .2=,:PF:It.JT 
,P¡.;CE$(25': 
15121121 INK 1.ll:PEN I:LOCHTE 1.7 
1510 PRIf
T "Gula a Smalev 
'N el l
 
berinto c(:,glendo' :PRINT:PPIt..JT"I.
 p 
¡ezas coIDr
adas. pero atenclon:" 
1520 PRINT:PPINT "lo
 grumpi- ,nten 
t.a..ran atrapartee.. 1I 
1530 PEN 3:PRINT:PRINT:PRItH 
1540 PRINT "F'u 1 -a ,-" 
1550 PEN 1 :PRINT:PRII'JT "
 par
 te 
elado," 
1560 PRINT: PRItIT ".1 par a J o>'
 t I ck 


1 570 PE
.J 2: LOCATE 5.25, F'P 1 I.JT " Pu 1 
sa espacio para empezar )" 
1 588 ¿'¡.

=69: b
,
=71 : c
,
=3';': o... -':( 1 
1590 WHILE IN
EY"47' -1 
1600 IF INKEY(37';-1 THEN LOCHTE 1. 
17:PR11.n CHR$(24"O:PRIt.JT:PRINT' ": 
PEN 3:LOCATE' 1.22:PPIf.JT "A. .arriba 
2. .abC',jo <.. i zq. '. ..jer. ':PE
.J 
2 : a

=65' : t./
= 71 : c%=39 : d.,
= 31 
1610 IF Jt.WE'((45»-1 THEfJ :LOCATE 1 
,22:PRIt,n SPACE1,(40¡ :LDCHTE 1.17:PR 
INT " ":PRII
T:PRJt.JT CHF'$' 243) :
';=,¿ 
:b%-73:e%=74:d%=75 
16213 I)JEND 
1 ¿.30 PAPER @ 
1648 RETURN 
16513 
16,
O 
EM Sloui
nte p
nt
113 
1670 PEt
 q:LUCATE 2.12:PF:IfJT CHRt' 
22) : e HR$ ': : > . O! 2 ¿. n 1: 01.1 1 .:0 1 ; se r e en; 11 e omp 
Il' t«" : CHF.t,. _'::; ; CHF:t. O I 
1.S:30 scr€'en::'5creen+l: IF 5cr
p.rl=10 T 
HH.I =cr l'l'n I 
1..::.'7'0 =.cc're"
-score.'
+bQnlJ
:F'Et"l 1':r:LOC 
""TE 7.25:PRItIT seor,,:.: 
170f:i RETURt'.¡ 
1716 
1720 F'EI'1 .'" Fin dl' 1 J lJl'yO ...... 
1730 FDR t%=0 TO 5B00:NEXT 
1740 FOF: x%=O TO 320 STEP 4 
1758 t'IO'.}E x'.. 0: DR':';[,I x;'.. 4(1 e . o 
17¿.(1 MCi'.'E 6..(1-X.... 0: ['f;'At.J 
40-xi':. 4(10, 
O' 
1 770 11EXT 
1780 JF 
.cor'e,',
)hi'. THE
.J hl
-:-s.cQre',
 
17'
e PE
I 14:LOCATE 1..3:PRHJT STRlt,/iJ 
!f..
 20 , "...1 ) 
1800 PE
J II:PRINT '
1l')or 
,ur,tuaelor, 


= l' :,.... i 

 


1810 Pf;'HJT:PF:II.IT:F'EtJ 12:PPItJT "Tus 
pun tos=u: sCQr'e"', 
12:2(1 F'R 1 I.IT, PEt.1 14:: PR 1 liT 
:TF: 1 tIG$' 20 


,"..." ) 


1830 PEI, 13:LOCi-;TE 1.15:F'PIIH "utro 
j IJegc. . ,?II : k e :=-1 
184(' t'..IH 1 LE V....=-I 
1850 IF H.Jf:E'I(43, >-1 THEtl k
:=43 
1860 1 F 1 fWEY' 'k,) '-1 THEtl "'.='1.:. 
1870 I,JEt.W 
1880 RETURN 


),.QO\ lr¡ 



 
" 
\, 


I I 
 


123(1 
'
'.=gho
t%
 i""
11 )+. gho
,t%( 1;/
,1) > 
many;<'J -( 9host%
 I:
, 1) (man ..,;
) : 1 F t
1I D$ 
(ma.ze1.
)'%) Igho
t;'
'; I

,O) ,1 »I'?II THEN 
Y%=ghost".\ 1

,1) 
12413 "%=g"'o=,t.,;( i%.@)-(ghost%(,;,.8)< 
man x;< \ + (gh O
, t
: ( I 
,; , £1 ' )man x
-: ' : I F MI D$ 
(ma=
$'y
),x%,l»'I?" THEN x%=ghost% 
( i%.0) 
1250 IF 
1ID$(maz€"$(g
,e,
.t%( i

,I)) .9 h 
e,sti.(I/..0).I'=")" THEN temp$ CHR$(1 
44) ELSE temp$=' " 
1268 PEN sereen:LOCATE ghost%(i%.e) 
,Qho
t:';';I:
.I):PRIIH temp$:PEN II+i% 
:LOCATE x%.y%:PRINT CHR$(2251:ghost 
': ( I /'. , (:1 ) = x% : gh o =: t
.: ( i 
< , 1
 ... = >'

 
1270 IF x%=manx% AND y%=man
: THEN 
oK=0 
1280 RETURN 
12S'O 
13@0 REM .. Cogido' .. 
1310 FOR 1%=255 TO 128 STEP -1 
1320 PEII INT(R
.JD*15':LOCATE manx;';.m 

n.
:PRINT CHR$(,;,) 
13
O CALL 
8
19:S0UND 132.INT(RND*1 
1300)+1121130.5,15 
1 :::40 NEXT 
1350 1 1','es=1 i '
'es-l 
1:::60 IF II',Ie
=0 THEN LOCATE 6,12:PE 
N 14:PRINT CHR$(22);CHR$(I);rGAME 
OVER'jCHR$(22;:CHR$(0) 
1378 RETUf;N 
1388 
1398 REM 
. In
trucclones ** 
1480 ENV 1,10.1.100,10.-1.20 
14113 80RDER @: 1 NK 0. o : 1 Nf' l. (1 : Ir.II<. _ 
.o:INK 3.24 
14213 PAPER O,CLS:PEN 1 :LOCATE 1.25: 
PRINT "Smale, 'J", Grumpis"; 
14313 SOUND 1.60,11130.4.1, SOUND 2.80 
,1180,2.1:S0UND 4,95,1100,8.1 


. 
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Pam que lus dedo. 
no realicen ellmb% dura, M. H, AMS 
TRAD lo hace par 1,. Todas las hiladas que induyon 
eSIe logalipo se encuenlran o IU d,ÚJoslÓon en un caso 
seffe mensual iohÓlanasla. 
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in duda 
alguna 


A través de esta sección 
se pretende resolver, en la 
medida de lo posible, todas 
las posibles dudas que «ator- 
menten» a todas las perso- 
nas interesadas en el mundo 
del AMSTRAD, sean o no po- 
seedores de uno y, si /0 son, 
se encuentren en cualquier ni- 
vel de destreza en su manejo. 
Semanalmente, aparecen 
en estas páginas las consultas 
de la mayor cantidad de 
usuarios posible; ello redun- 
dará en un mejor servicio y en 
un contacto más estrecho en- 
tre todos nosotros a través de 
la revista. 
SIN DUDA ALGUNA está 
abierta a todos. 


Seréis, semana a semana, 
los encargados de construir 
esta página con vuestras con- 
sultas. En más de una oca- 
sión, aquello que os preocu- 
pa ya ha sido contestado an- 
tes a otro lector o, por el con- 
trario, puede suceder que de- 
terminada consulta aclare 
muchos quebraderos de ca- 
beza de otros aficionados. 
Las cartas «sin duda algu- 
na», nos servirán de gran 
ayuda. Gracias a ellas podre- 
mos ir evaluando vuestras ne- 
cesidades y, de este modo, 
modificando el contenido de 
MICROHOBBY AMSTRAD 
acorde con ello. ¡OS espera- 
mos! 


32 MlaOHOBBY AMSTRAD 


Me gustaría que los programas 
que se publican en la revista fuesen 
para el 464 y para el 664, sin utili- 
zar los nuevos comandos disponibles 
para éste, o al menos indicando los 
cambios que hay que realizar para 
que funcione en ambos. 


Manuel García (Barcelona) 


Comprendemos tu inquietud. Su- 
ponemos que tienes un 464 y te preo- 
cupa no poder disfrutar de los pro- 
gramas de la revista. 
Bien, la mayoría de los programas 
que se publiquen serán compatibles 
para ambos ordenadores y, cuando 
no lo sean, trataremos de indicar las 
modificaciones necesarias. 
Sin embargo, hay programas en 
los que esto no es posible, bien por- 
que manejan código máquina en di- 
recciones de memoria determinadas, 
bien porque si se hace uso intensivo 
de los nuevos comandos del 664. 
Simplemente hay efectos que en el, 
464 no se pueden conseguir, o ha- 
bría que volver a escribir el progra- 
ma en su totalidad. 


Cuando se tiene grabado un pro- 
grama en cinta y, por ejemplo, con- 
tiene 8 bloques, se me plantea el pro- 
blema de que si por el motivo que 
fuere, el bloque 1 no lo carga, el res- 
to de los bloques, no se pueden lis- 
tar. 
¿Podrían explicar cómo ha de ac- 
tivarse cuando se quiere listar parte 
de los bloques que contiene un pro- 
grama? 


Damián Gallego (Vitoria) 


El Amstrad salva en cinta por blo- 
ques de una longitud de 2 Kbytes ca- 
da uno, pero no salva por bloques 
de línea de programa necesaria- 
mente. 
fs decir, un programa Basic, para 
el ordenador no es más que una se- 
rie de bytes que van de tal a tal di- 
rección y, como tales, se vuelcan a 
la cinta. Si el primero u otro cualquie- 
ra de el/os no carga, el resto de los 
bytes que vienen no tienen ningún 
sentido para la máquina y, por tan- 
to, no se da por enterada cuando le 
pedimos el listado. 


elicidades en primer lugar, 
por la idea de hacer una publicación 
semanal para usuarios de ordenado- 
res Amstrad. Me dirijo a vosotros 
para ofreceros una colaboración, 
una línea de programa que creo se- 
rá útil para aquellos usuarios que ha- 
gan programas con texto. Y es que 
veréis lo que me pasó el otro día 
cuando recibí una carta por impre- 
sora de un amigo, decía: «oo. Mana- 
no por la manana será mi cumplea- 
nos y podré anadir un ano más a mi 
lista de anos, y siento anoranza.» Por 
otra parte, creo que él también se 
sorprendió cuando le pregunté si le 
gustó el «barreno» que le regalé. 
Nunca me había fijado en lo impor- 
tante que son las eñes. Por ejemplo, 
no es lo mismo que mi hermana se 
quite el moño, que mi hermana se 
quite el mono. Pero sobre todo, lo 
que me decidió a hacer la línea de 
programa fue la imposibilidad de 
mandar a la gente a hacer puñetas, 
yo no me resigno a mandar a hacer 
punetas. Creo que ya os habréis da- 
do cuenta de que mi línea de progra- 
ma es para incluir la letra eñe en el 
teclado, en la tecla que está situada 
a la derecha de la interrogación, "i 
También saldrá en mayúsculas dan- 
do a esa tecla ( " ) y SHIFT. 
He aquí la línea de programa: 


7 SYMBOL AFTfR 237:SYMBOL 
237,60,0,276,702,702,702,702,0: 
SYMBOL 238,276,230,246,222,206, 
798, 798,O:KfY OfF 77,7, 774:KfY 
OfF 22,0,237,238 


Como véis es muy fácil y nada te- 
dioso de programar, no vale la pe- 
na ir por el mundo escribiendo bu- 
rradas, con lo poco que cuesta po- 
ner las eñes en el teclado. Sin más se 
despide, 


Ramón Luis Montara de Francisco 
(Madrid) 



I 


. 
. 


. 


. 


'i 


el l 
NU 
 \.. 


£f£\\£"t\
 
a AS\C 

OG

QII 
9
1
 f.\ 
, 'ti" 
cpc.a. 6 a. 


,. 


. 


Manual de Referencia Basic 
para el Programador 
Lo más autorizado y completo 
guío paro programar en 
Locomotive Basic. 
3.400,- Pts. 


CODIGO MAQUINA 
PARA 
PRINCIPIANTES 
.'N '\lJ"1-I' 
 I1 


... 


. 



 
.... --.. 



, 
.._._f,' 
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-teveJ<ram...- 


Código máquina para 
principiantes con AMSTRAD 
Ideal paro iniciarse en el código 
máquina del zao y en el 
sistema operafivo del AMSTRAD. 
2,100,- Pts. 



 


, écnicas de 
Progra f/ ,/.,:;" 
de Grali /Í/
' 
e, '. :'f/
'fff;l l 
w 'o,
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'AQ 


Técnicas de Programación de 
Gráficos en el AMSTRAD 
Este libro enseño o aprovechar 
los excelentes funciones 
gráficos del AMSTRAD, con 
múltiples ejemplos. 
1.950,- PIs. 
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01 
!QI] 
a] 
1] 
IJ 
'i,h 
1] 
Curso Autodidáctico de Baslc I y 11 
Un completo y estructurado Curso de Basic apoyado con numerosos 
ejemplos y acompañado de cassettes. 
2.900.- Pts,cada volumen 
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AMSTRAD 
Juegos Sensacionales para 
AMSTRAD 
Listados completos de 27 
estupendos juegos de muy 
(.o diversos estilos. 
1.950.- Pts. 
Hacia la ¡.1':";'1"iv.
iJ 
lntelipencia 
ArtifIcial con 
Amstrad 


. , 
, " 

;:> t '
J 

1l 
,...." 
.rG .
. r)


 
, 
 "'VI 


. 
. " Vine 


Hacia la Inteligencia Artificial 
con AMSTRAD 
Convierto su AMSTRAD en un 
compañero inteligente 
1.500;- Pts, 


ill [U] 
Urnill[]J 
CPC.464 
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PROGRAMANDO 
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1M S '1 I 
Programando con AMSTRAD 
Fundamental para el usuario 
principiante. 
Ameno y repleto de ejemplos. 
2,400,- Pts, 


Música 
y Sonidos 
con 
llmstrad 
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Música y Sonidos con 
AMSTRAD 
Programe músico y efectos 
sonoros y convierto su 
AMSTRAD en un sintetizador. 
1.200.- Pts. 
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VinclI App. 
AMSTRAD 
CPC.4B4 


40 Juegos Educativos 
Listados completos 
(matemáticos, geografía, 
músico, etc.) paro aprender 
divirtiéndose. 
1.950.- PIs. 
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Programación de Basic con 
AMSTRAD, 
Imprescindible para el 
principiante y eficaz 
herramienta para el 
programador avanzado. 
2,100,- Pts. 
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PlBLIC.ACIOI'£S 


Avd. del Mediterráneo, 9 
Tells.: 433 45 48 - 433 48 76 
28007 MADRID 
Delegación en Cataluña: 
C/. Tarragona, 110 - Telf, 325 10 58 
08015 BARCELONA 
DE VENTA EN El CORTE INGLES 
Y TIENDAS ESPECIALIZADAS 


e Marco Regislroao por el Grupo Indescomp. 




erca
o 
cornun 


Con el objeto de fomentar las rela- 
ciones entre los usuarios de AMSTRAD, 
MERCADO COMUN te ofrece sus pági- 
nas para publicar los pequeños anuncios 
que relacionados con el ordenador y su 
mundo se ajusten al formato indicado a 
continuación. 
En MERCADO COMUN tienen cabida, 
anuncios de ventas, compras, clubs de 
usuarios de AMSTRAD, programadores, 
y en general cualquier clase de anuncio 
que pueda servir de utilidad a nuestros 
lectores. 
Envíanos tu anuncio mecanografiado 
a: HOBBY PRESS, S.A. 
AMSTRAD SEMANAL. 
Apartado de correos 54.062 
28080 MADRID 
¡ABSTENERSE PIRATAS! 


Desearía contactar con usuarios 
del Amstrad (en especial del CPC 
664). Manuel Jesús Rodríguez 
Seda no. Garda Espín, 1. 


................. 


Cambio programas Amstrad, 
sólo comerciales, más de 100 
títulos, entre ellos últimos éxitos. 
The Way of Exploding Fist, 
Gremlins, copiones, utilidades, etc. 
E. Valderas Fdez. Apdo. 41. 
Puertollano (Ciudad Real). 


................. 


Vendo: 
Amstrad CPC-464. Color. Como 
nuevo. 
100 juegos y utilidades 
(comerciales). 
Libros y manuales. 
Comprado en Corte Inglés. 
Perfecto estado. Todo por 85.000 
ptas. Rafa Urmeneta. Ora. 
Zaragoza, sIn. Arguedas 
(Navarra). Te!. (948) 83 00 42. 


ANA 100.000 PESETAS 
CON MICROHOBBY 
.
 MSTRAD SEMANAL 


Porque pretendemos que AMSTRAD SE- - Todos estos datas deberé n ir escritos a mé- 
MANAl sea también vuestra revista, hemos quina o con letra clore paro mayor comprensión 
abierto una sección en la que se publicarán los del programo, 
mejores programas originales recibidos en nues. - En una sola cinta puede introducirse más 
tra redacción. Vosotros seréis los encargados de de un programa, 
realizar estas páginas, en las que podréis apar- - Una vez publicado, AMSTRAD SEMA- 
tar ideas y programas interesantes para otros NAl abonará al autor del programa de 
lectores, 15.000 a 100.000 pesetas, en concepto de 
Las condiciones son sencillas: derechos de autor, 
- los programas se enviarán a AMSTRAD - los autores de los programas selecciona. 
SEMANAL en una cinta de cassette, sin protec. dos para su publicacián, recibirán una comuni. 
ción en el software, de formo que sea posible cación escrita de ello en un plazo no superior 
obtener un listado de los mismos, o dos meses a partir de la fecha en que su pro- 
- Coda programa debe ir acompañado de grama llegue a nuestra redacción. 
un texto explicativo en el cual se incluyan: - AMSTRAD SEMANAL se reserva el de- 
- Descripción general del programo. recho de publicación o no del progroma. 
- Tabla de subrutinas y vanab/es utilizadas, - Todos los programas recibidos quedarén 
explicando claramente la función de cada en poder de AMSTRAD SEMANAl. 
una de ellas. - los programas sospechosos de plagio se- 
- Instrucciones de manejo, rón eliminados inmediatamente, 
¡ENVIANOS TU PROGRAMA! 
Indicando claramente en el sobre: 
AMSTRAD SEMANAL 
a HOBBY PRESS, S. A. la Granja, n. o 8. Poi. 'nd. Alcobendas (Madrid) 


34 MICNOHOBBY AMSTRAD 


Vendo ordenador Amstrad 
CPC-464 color e impresora 
original Amstrad DMP-1, todo 
como nuevo, la impresora está en 
garantía. Precio nuevo actual 
160.000 ptas., lo vendo por 
140.000 ptas. Tel. 
(96) 332 32 83). Valencia. 


................. 


Estoy interesado en adquirir 
monitor fósforo verde para 
Amstrad CPC664. Precio a 
convenir. Tel. 351 6470. 


................. 


Vendo Amstrad CPC-664 con 
unidad de disco y monitor en 
color y, otro igual, en fósforo 
verde, ambos con tan sólo un mes 
de uso, están totalmente nuevos. 
Tien -n garantía Amstrad España, 
manual en español, otro manual 
en inglés, los dos discos originales 
de regalo (e/pm, Lago y base de 
datos, procesador de textos, 
Random Files, Oiseñador de 
gráficos, puzzle, animal, vegetal y 
mineral). Además regalo el 
Decathlon en cinta original y un 
disco virgen marca Amsoft. Con 
monitor en color, 120.000 ptas. 
Con monitor en fósforo verde, 
95.000 ptas. Razón: Joaquín 
Domínguez Torrecilla. Sto. 
Entierro. Urbanización «Las 
Vigas». Bloque 1 - 2. o E. 11000 
San Fernando (Cádiz). T el. 
(956) 89 30 02. 


................. 


Por cambio de ordenador 
vendo los siguientes programas a 
600 ptas. cada uno: Rocky, Pole 
position, Decathlon, Gremlins, 
Knight Lore y algunos otros. Todos 
son originales. Mario Garda. Villa 
Begoña, 6 - 4. o Izq. Haro (La 
Rioja). (941) 31 14 45. 


................. 


Vendo Amstrad 464 fósforo 
verde por 35.000 ptas. Está como 
nuevo (2 meses) . También 
vendería 10 programas de juegos 
a 500 ptas. cada uno. Entre ellos 
tengo Rocky, Knight Lore y 
Combate Libre. Maite Uñarte 
Murua. Apdo. 1.582. Bilbao. 


................. 
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SOLICITUD DE CINTAS DE PROGRAMAS Y NUMEROS ATRASADOS 


o Deseo recibir en mi domicilio, al precio de 675 ptas. cada una, las siguientes cintas con los programas 
publicados por Microhobby AMSTRAD Marco con una (X) la(s) cinta(s) que deseo: 


o Cinta n.o 1 (contiene programas publicados en revistas 1 al 4 Inclusive) 
O Cinta n.o 2 (contiene programas publicados en revistas 5 al 8 inclusive) 
O Cinta n.o 3 (contiene programas publicados en revistas 9 al 12 Inclusive) 
O Cinta n.o 4 (contiene programas publicados en revistas 13 al 16 inclusive) 
O Cinta n.o 5 (contiene programas publicados en revistas 17 al 20 inclusive) 


o Deseo recibir en mi domicilio, al precio de 150 ptas. cada uno, los siguientes números atrasados de 
Microhobby AMSTRAD 


Nota: Por razones administrativas. no podemos admitir solicitudes de envio de cintas o números sueltos con pago contra reembolso o 
T arjefa de Crédito. Par lavar, envia talón por el Imparte o giro postal. 
SI la farma de pago elegida es falón bancario. remltefo junio con este cupón en un sobre cerrado a la misma dirección. 
Las cintas de programas se editan una cada mes. Si solicitas varias las reciblras sucesivamente. conforme sean edItadas. No se cobran 
gastos de envio por las cintas y numeros sueltos. 


a 


NOMBRE 
APELLIDOS 
DOMICILIO 
CIUDAD 
C. POSTAL 


EDAD 


- ,1 
-

 
endente 
'hle. 
o. 


PROVINCIA 
PROFESION 


TELEFONO 


Marco con una (X) en el casillero correspondiente la forma de pago que más me conviene. 
O Talón bancario adlunto a nombre HOBBY PRESS, S. A. O Giro Postal N.o 


Firma: 
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POPULAR Computing WEEKLY 
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Un ordenador personal 
extraordinario con unas 
i Solución total \ enormes posibilic;lades 
a un precio fenomenal! com? o
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Personal Computer World 
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\ SIl 8asic se puede 
" considerar impresionante... 
. tiene unas características 
, no usuales en nticroordenadores 
de su categoría. 


Su Basic es rápido, más rápido 
que casi todos los basics de 8 bits 
y qu e algu nos de 16 bits. 
r::::
 
I ? CHOICE 
El mejor 
Basic 
que he visto. 
- '----- 
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SCIENCE VIE MICRO 


Se asedia a los 
distribuidores 
para conseguir 
unAMSTRAD. 
" 
1 La demanda 
J 
es desbordante. 
....... - J 
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SISTEMA COMPLETO CON MONITOR 
EN FOSFORO VERDE, MANUAL EN 
CASTELLANO, GARANTlA OFICIAL 
AMSTRAD ESPAÑA, DISCO CON SIS- 
TEMA OPERATIVO CP/M 2.2 y LEN- 
GUAJE DR. LOGO, DISCO CON SISTE- 
MA OPERATIVO CP/M PLUS (CP/M 
3.0) y UTILIDADES, DISCO CON SIETE 
PROGRAMAS DE OBSEQUIO 
109.500 PtS. 
SISTEMA COMPLETO IGUAL AL ANTE- 
RIOR PERO CON MONITOR EN COLOR. 
134.500 Pts. 
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ESPAÑA 
Avd. de Mediterráneo, 9, 28007 MADRID. 
Tals. 433 45 48 - 433 48 76 
Delegación Cataluña: C/. Tarragona, 11 O, 
08015 BARCELONA - Tel. 325 10 58 



